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

Question

Информатика

Марзигет

27 марта, 07:07

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

+1

Ответы (2)

Знаете ответ на вопрос?

Ельмирина · Answer 1

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.

Лабарон · Answer 2

var i:integer;

begin

for i:=0 to 100 do

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

end.