Question

найти произведение всех двузначных чисел кратных 7!!!
Паскаль ​

Answer 1

var n:real;

var i:integer;

begin

n:= 1;

for i:= 10 to 100 do

  if i mod 7 = 0 then

    n:=n*i;

writeln(n);

end.