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.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
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.