Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- uses
- system;
- var
- v, f: real;
- begin
- Console.WriteLine('--------------------------');
- Console.WriteLine('| v | F(v) |');
- Console.WriteLine('--------------------------');
- v := 0;
- for var i := 0 to 16 do
- begin
- if (0 <= v) and (v <= 0.5) then f := sqr(v) + power(v, 1 / 3)
- else if (0.5 < v) and (v <= 8) then f := ln(v + sin(v));
- Console.WriteLine('| {0:0.000} | {1:0.000000} |', v, f);
- v += 0.5;
- end;
- Console.WriteLine('--------------------------');
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement