Составить программу вычисления и печати значений функций Y=0.5x-√x+1

Pascal ABC

Question

Препедигна

28 июля, 11:34

+1

Ответы (1)

Знаете ответ на вопрос?

Сильвестра · Answer 1

Var

x, y:real;

begin

write ('Введите значение x=') ; read (x) ;

Y:=0.5*x-sqrt (x+1) ;

write ('Y=', y:5:2) ;

end.

Составить программу вычисления и печати значений функций Y=0.5x-√x+1Pascal ABC