ПОМОГИТЕ ПОЖАЛУЙСТА СРОЧНО ПРОШУ! НУЖНО НАПИСАТЬ ЛЮБОЕ ВЫРАЖЕНИЕ НА ЯЗЫКЕ ПРОГРАММИРОВАНИЯ!
ПОМОГИТЕ ПОЖАЛУЙСТА ВЫБЕРИТЕ ЛЮБОЕ ВЫРАЖЕНИЕ И НАПИШИТЕ ПОДРОБНО НА ЯЗЫКЕ ПРОГРАММИРОВАНИЯ ПАСКАЛЬ ABC

По дате
По рейтингу
123456789101112131415161718
program Main;
var
x: real;
result: real;
begin
write('Введите значение x: ');
readln(x);
if (x >= -2.4) and (x <= 5.7) then
result := x
else
result := 4;
writeln('F(x) = ', result);
end.