Вывести все натуральные числа, кратные 5, которые не превышают заданное число N

@Иван Сечин · Регистрация: 25.12.2016

Вывести все натуральные числа, кратные 5, но которые не превышают число N, введенное пользователем с клавиатуры.

@xSanekk · 26.12.2016, 00:22

Pascal

writeln('N = ');
readln(n);
i := 0;
while i <= n do
begin
 writeln(i);
 i := i + 5;
end;

@bormant · 26.12.2016, 01:02

xSanekk,
ноль не является натуральным числом.

Pascal

  i:=5;

@Иван Сечин 0 / 0 / 0 Регистрация: 25.12.2016 Сообщений: 6
		1
	Вывести все натуральные числа, кратные 5, которые не превышают заданное число N 25.12.2016, 23:48. Показов 6718. Ответов 2 Метки нет (Все метки) Вывести все натуральные числа, кратные 5, но которые не превышают число N, введенное пользователем с клавиатуры. 0

	26.12.2016, 01:02

Решение