Информатика, вопрос задал kilkapukilkapu , 2 года назад

Оставить программу по формуле.
На языке паскаль. ​

Приложения:
fedrfedr: ответ в предыдущем вопросе, дублировать ответ не буду
kilkapukilkapu: спасибо большое! напиши что-нибудь здесь, что бы побольше баллов было

Ответы на вопрос

Ответил BobbyFresnel
0

var

 x, y: real;

begin

 Read(x);

 if x < -2 then

   y := abs(x) + 2

 else if x <= 2 then

   y := 1

 else

   y := x + 1;

 write(y);

end.

Предыдущий вопрос
Следующий вопрос
Новые вопросы