Произвести табулирование функции X-SIN(x) на отрезке [0,pi/2] в 10 точках - Turbo Pascal
Формулировка задачи:
Произвести табулирование функции X-SIN(x) на отрезке [0,pi/2] в 10 точках.
Использовать цикл с предусловием и цикл с постусловием.
Решение задачи: «Произвести табулирование функции X-SIN(x) на отрезке [0,pi/2] в 10 точках»
textual
Листинг программы
var
x: real;
begin
writeln(' x x-sin(x) (while do)');
writeln('--------------------');
x := 0;
while x <= pi / 2 do
begin
writeln(x:0:5, x - sin(x):9:5);
x := x + pi / 2 / 9;
end;
writeln(' x x-sin(x) (repeat until)');
writeln('--------------------');
x := 0;
repeat
writeln(x:0:5, x - sin(x):9:5);
x := x + pi / 2 / 9;
until x > pi / 2;
readln;
end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д