Власий
6 год назад
Написать программу вычисления значений функции в заданныхточках (Turbo Pascal) Очень нужно
ОТВЕТЫ
Невена
Oct 24, 2020
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.
36
Смежные вопросы:
