Составить программу вычисления значения функции: нужно

nataxasan1984 nataxasan1984    1   26.05.2019 11:42    0

Ответы

program raf105;

var x,y: real;

begin

write('x = ');

readln(x);  

if x >= 1

 then y:= power(x,2);

if x < 1

 then y:= 1-x;

writeln('y = ',y);

end.

PascalABC 3.4.2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика