Для данного вещественного x найти значение y=3-x если x<-2 или х>2; y=-10xПаскаль​

program z1;

var x:real;

begin

readln (x);

if x > 3 then write (x*x+5:0:2)

else write (x-8:0:2);

end.

Объяснение:

:0:2 - форматированный вывод

Число после первого двоеточия - общее количество позиций под число, включая знаки после запятой (можно ставить 0 и тогда программа определит самостоятельно, как обычно и делает)

Число после второго двоеточия - количество позиций после запятой (если знаков нет, то программа выведет нули)

Форматированный вывод округляет число