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

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

Задать свой вопрос
2 ответа

var i:integer;

begin

for i:=0 to 100 do

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

end.

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.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт