Question

Помогите со 2 заданием 5 варианта ( Паскаль)

Answer 1

Ответ:

• var x,y:real;
• begin
• read(x);
• if x<=0 then y:=x+3
• else y:=cos(x);
• write(y);
• end.

или:

• begin
• var x := ReadInteger('x:');
• Print('y:',x<=0?x+3:cos(x));
• end.

Пример работы: