Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program functionTab;
- var
- //y : double;
- i: real=-2;
- x: double;
- begin
- while(i<=5) do
- begin
- if(i<=0) then
- begin
- x:=0;
- end;
- if(i<=1) then
- begin
- x:=i;
- end;
- if(i>1) then
- begin
- x:=i*i*i*i;
- end;
- write('The value of x is: ');
- writeln(x);
- i:=i+0.45;
- end;
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement