Вычислить значение выражения - Pascal ABC (16779)

Формулировка задачи:

Поморите пожалуйста решить задачки в Pascal... Фото заданий ниже) Спасибо.

Код к задаче: «Вычислить значение выражения - Pascal ABC (16779)»

textual
uses crt;
const A=-0.75;
      B=51;
var y,x:real;
begin
writeln('Введите X:');
read(x);
y:=1+abs(x-b)+sqr(x-a)/2;
writeln('Y = ',y);
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

8   голосов, оценка 4.125 из 5


СДЕЛАЙТЕ РЕПОСТ