Регистрация
albigazdalieva
03.01.2023 05:23
Информатика
Есть ответ 👍

Два задания по информатике, написать программы решения примеров на Паскаль.

203
289
Посмотреть ответы 1

Ответы на вопрос:

zephy
zephy
4,4(97 оценок)
Var n, i: integer; x, ans, s: real; begin readln(n, x); ans : = tg(x); s = ans; for i : = 2 to n do begin ans : = tg(ans); s : = s + ans; end; writeln(s); end.

Популярно: Информатика