Question

Помогите написать программный код в Turbo Pascal для ВЫЧИСЛЕНИЯ ЗНАЧЕНИЯ ФУНКЦИИ

Answer 1

Ответ:

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.

Объяснение: