Вопрос от посетителя
Составить приложение на языке Pascal.
Вычислить на ПК значения функции, заданной в таблице. На печать
вывести значения вводимых исходных данных и полученные результаты,
сопровождая их именами переменных. Значения аргумента взять из
указанного диапазона так, чтобы протестировать все ветви программы.
Отвечает Илюха:
var a,x,b:real;
Begin
read(a,x);
if x>4 then b:=x*ln(x*x);
if x<3 then b:=a*cos(x);
writeln(b);
End.