what language is this?

0 Bernard Pyc0d333 Parah · April 9, 2015
Sentinel =0.0; var
X:Real;
begin
writeln('After each line enter a real
number or 0.0 to
stop'); writeln;
writeln('X', 'Trunc
(x)' :16, 'Round(X) ' :10, 'Abs(X)' :10,
'Sqr(X)' :10,
'Sqrt(Abs(X))' :15);
readln (X); while X <>
Sentinel do
begin writeln (Trunc
(X) :17, Round(X)
:10, Abs(X) :10:2, Sqr(x)
:10:2, Sqrt(Abs(X))
:10:2);
readln(X); end
end.

Post a Reply

Replies

Oldest  Newest  Rating
0 Dol Lod · April 9, 2015
PASCAL maybe? 
0 Bernard Pyc0d333 Parah · April 9, 2015
yup
  • 1

Other Programming Languages

107,193 followers
About

I think it is pretty obvious what this section is for.

Links
Moderators
Bucky Roberts Administrator