Составьте программу вычисления значения функции y=-0,78xx+10.

Question

Евфросиния

10 января, 14:28

+1

Ответы (1)

Знаете ответ?

Бенедиктыч · Answer 1

Program func;

var x, y: real;

begin

writeln ('Введите x') ;

readln (x) ;

y:=-0.78*x*x+10;

writeln ('y=', y) ;

end.

Составьте программу вычисления значения функции y=-0,78*x*x+10.