Question

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

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.