Вывести на экран 12 первых двухзначных целых чисел кратных 4​(паскаль) ​

adelyavalieva1 adelyavalieva1    2   05.03.2021 21:54    0

Ответы
lera08862 lera08862  04.04.2021 21:58

Объяснение:

program mn;

var a,b,c,k,s: integer;

begin

b:=0;

for s:=10 to 99 do

begin

k:=s mod 4;

if k = 0 then

begin

b:=b+1;

if b <= 12 then

writeln (s);

end;

end;

readln

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика