begin var real 1234 5678 end

1
2
3
4
begin
var a:real;
a:=1234.5678;
end.