Регистрация
kate653
21.12.2020 12:57
Информатика
Есть ответ 👍

Напишите программу для расчета по формуле.

226
350
Посмотреть ответы 2

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

RykaBa3yka
RykaBa3yka
4,7(56 оценок)
Var   y: real; begin   y : = tan(3 * pi);   y : = y * y; {квадрат}   y : = y * y; {четвертая степень}   y : = (1 - y) / (ln(8) / ln(3));   writeln('y=', y) end.
ilyawifiilyap00qfm
ilyawifiilyap00qfm
4,6(11 оценок)

Это для Паскаля или лазаруса я не пойму напиши в коменнты я отвечу

Объяснение:

var n: integer

Begin

Writeln('n');

if (n:=1*2*3*4...*n) <8 then>8

if (n:=1*2*3*4...*n) >8then<8

Writeln ('n'n)

End.

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