help s=10 for i=1 to 5 do s=s+2*i writeln (s)

20

var i,s: integer;

begin

s:=10 ;

for i:=1 to 5 do ;

s:=s+2*i ;

writeln (s);

end.