
Nahi
6 год назад
Написать программу вычисления значений функции в заданных точках (Turbo Pascal) Очень нужно

ОТВЕТЫ

Агриппин
Jul 1, 2019
Var
i: integer;
a: real;
begin
writeln(Enter a:);
readln(a);
for i := 1 to 7 do
writeln(d(, i, ) = , a / i - tan(i));
end.
i: integer;
a: real;
begin
writeln(Enter a:);
readln(a);
for i := 1 to 7 do
writeln(d(, i, ) = , a / i - tan(i));
end.
293
Смежные вопросы: