Составьте программу для нахождения суммы чисел 20 до 60 кратных пяти.по турбо паскалю
226
335
Ответы на вопрос:
var
i,s: longint;
begin
for i: =20 to 60 do if i mod 5=0 then inc(s,i);
writeln(s);
end.
var
i,s: integer;
begin
s: =0;
for i: =20 to 60 do
if i mod 5 =0 then s: =s+i;
writeln(s);
end.
ответ:*розмір
*вирівнювання
*обтікання текстом
*межі та заливка
*також додаткові властивості
Объяснение:
Популярно: Информатика
-
RetoGero06.01.2022 13:51
-
СакураХаруно1727.02.2020 17:56
-
ivanpowerflusi22.03.2020 19:02
-
doblezor05.08.2021 11:49
-
Chechenec00123.06.2020 15:59
-
artemchik2527.03.2020 00:07
-
алоал01.01.2021 16:44
-
виктор228217.05.2022 19:16
-
КсюшаАнтропова05.02.2021 20:57
-
хелпмиплиз66624.06.2020 12:26