Запиши программу ** языке Паскаль для: {0, если x≤0 y= {x, если 0 {x2,если x>1 Запусти...

Question

Запиши программу на языке Паскаль для: {0, если x≤0 y= {x, если 0 {x2,если x>1 Запусти программу и введи значение x=10

Answer 1

Ответ:

var x,y:real;

begin

write('Введите x: ');

readln(x);

if (x

else if (x

else y:=x*x;

writeln(y:3:0);

end.

---