Предмет: Информатика, автор: Alvione

Помогите сделать программу по икт

Приложения:

Ответы

Автор ответа: erminasofja
1

Ответ:

program zadacha;

var x,y:real;

begin

writeln('x:');

readln(x);

if x<-6 then y:=x+3

else if x>10 then y:=(x+2)/2

else y:=x*x+2;

writeln('y=',y);

end.

Похожие вопросы
Предмет: Математика, автор: Серёга20020710