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

Как в помощь:

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

Question

Лидоня

17 апреля, 10:38

+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