BSD 3 development

[unix-history] / .ref-BSD-2 / doc / pascal / digits.p

program digits(output);
var r: real;
begin
r := 0.;
r := .0;
r := 1.e10;
r := .05e-10;
writeln(r)
end.