Выведите все двузначные числа, которые кратны 5 на языке Паскаль через цикл Repeat или While

Как в помощь:

условие n<100, т. е. n:=10

Question

Лидуша

6 марта, 20:22

+5

Ответы (1)

Знаешь ответ?

Донат · Answer 1

Program kratno;

var n: integer;

begin

n:=10;

while n<100 do begin

if n mod 5 = 0 then

writeln (n);

n:=n+1;

end;

end.

Выведите все двузначные числа, которые кратны 5 на языке Паскаль через цикл Repeat или WhileКак в помощь:условие n<100, т. е. n:=10