program DoubleEvenNumbers; var i: integer; begin writeln′Doubledevennumbersfrom10to99:′'Doubled even numbers from 10 to 99:'′Doubledevennumbersfrom10to99:′; for i := 10 to 99 do begin if imod2=0i mod 2 = 0imod2=0 then begin writelni∗2i*2i∗2; end; end; end.
var
i: integer;
begin
writeln′Doubledevennumbersfrom10to99:′'Doubled even numbers from 10 to 99:'′Doubledevennumbersfrom10to99:′;
for i := 10 to 99 do
begin
if imod2=0i mod 2 = 0imod2=0 then
begin
writelni∗2i*2i∗2;
end;
end;
end.