Решить задачу через Pascal ABC. Напишите программу в pascal которая будет решать эту задачу.


Решить задачу через Pascal ABC. Напишите программу в pascal которая будет решать эту задачу.

Aylar06 Aylar06    3   03.12.2020 12:59    0

Ответы
Or003 Or003  02.01.2021 13:00

                                              PascalABC.NET

begin

 var a := 5;

 var x := Readinteger('Введите x ->');

 var f := x > 1 ? ln(x+1) : cos(x**2+2*10**-5);

 Println('F = ', x = 1 ? sin(sqr(sqrt(abs(a*x)))) : f);

end.


Решить задачу через Pascal ABC. Напишите программу в pascal которая будет решать эту задачу.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика