Question

Вывести на экран все двухзначные числа кратные 7
(паскаль, цикл "до", "пока", "для")

Answer 1

Program abc;

var a:integer;

begin

for a:=10 to 99 do

if a mod 7=0 then

writeln(a,' ');

end.