Определите значение переменной s после выполнения программы:

var s:real; n:integer;
begin s:=0; for n:=2 to 4 do begin s:=s+n; s:=s * 10; end;
end.