Напишите программу для вывода на экран целых чисел кратных пяти из интервала от 0 до 100. используйте цикл с параметром.

яя82 яя82    1   29.09.2019 12:30    0

Ответы
lili2005ok lili2005ok  04.08.2020 19:23

const n=100

var a:arrya [1..n] of integer;

i:integer;

begin

for i:=1 to n-1 do

a[n+1]:=a[n]+1;

for i:=1 to n do

if (a[i] mod 5)=0 then writeln(a[i]);

end.

ПОКАЗАТЬ ОТВЕТЫ
Foolrelax Foolrelax  04.08.2020 19:23

var i:integer;

begin

for i:=0 to 100 do

if i mod 5 = 0 then writeln(i);

end.

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