Предмет: Информатика,
автор: egorto9
Вывести на экран 12 первых двухзначных целых чисел кратных 4(паскаль)
Ответы
Автор ответа:
1
Ответ:
Объяснение:
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.
Похожие вопросы
Предмет: Русский язык,
автор: spaikxl
Предмет: Русский язык,
автор: ульяна84
Предмет: Английский язык,
автор: Аноним
Предмет: Русский язык,
автор: 2010201220148