Напишите программу. В Паскале!

Дана система:

y={1, если x<0

{x+3, если 0<=x<10

{x/2, если x>=10

Question

Пётр

30 сентября, 12:10

+5

Ответы (1)

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

Варюня · Answer 1

Var x, y:real;

begin

readln (x) ;

if x<0 then y:=1

else if (x>=0) and (x<10) then y:=x+3

else if x>=10 then y:=x/2;

writeln (y) ;

end.

Напишите программу. В Паскале!Дана система:y={1, если x<0{x+3, если 0<=x<10{x/2, если x>=10