Вероника
4 год назад
Вычислить значения синусов в интервале от 0 до 6.283, шаг 0,31415.ВСЁ НАДО СДЕЛАТЬ В ПАСКАЛЕ.ЕСЛИ НЕ СЛОЖНО ОБЪЯСНИТЕ
ОТВЕТЫ
Viktor
Oct 24, 2020
var
x: real;
x := 0;
while x <= 6.283 do
begin
writeln('F(',x:0:1,') = ',sin(x)/x:0:2);
x := x + 0.31415;
end;
x: real;
x := 0;
while x <= 6.283 do
begin
writeln('F(',x:0:1,') = ',sin(x)/x:0:2);
x := x + 0.31415;
end;
84
Смежные вопросы: