Program z1;
Var
a:real;
Begin
a:=4.70;
While a<5 do
begin
a:=a+0.01;
writeln(a) ;
End;
End.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Program z1;
Var
a:real;
Begin
a:=4.70;
While a<5 do
begin
a:=a+0.01;
writeln(a) ;
End;
End.