КТО РЕШИТ , ТОМУ 55 БАЛЛОВ!!! составить программу нахождения суммы чисел кратным 3, от 12 до 36 (цикл)
ekaterina99:
через паскаль
Ответы
Ответ дал:
1
var a,b,c:integer;
begin
for a:=12 to 36 do begin
if a mod 3 = 0 then writeln(a);
end;
end.
begin
for a:=12 to 36 do begin
if a mod 3 = 0 then writeln(a);
end;
end.
Похожие вопросы
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад