Предмет: Информатика,
автор: yasrebov03
Помогите пожалуйста
(язык паскаль)
Приложения:
![](https://files.topotvet.com/i/5dc/5dcd8a1d6726d175fae4cdf298dca56c.jpg)
Омскаяптица:
Язык?
Ответы
Автор ответа:
3
Ответ:
var x,y: real;
begin
writeln ('введите х');
readln(x);
if x<-2 then y :=abs(x)+2
else if -2 <= x >= 2 then y := 1
else y := x+1;
writeln ('y = ', y);
readln;
end.
Объяснение:
Похожие вопросы
Предмет: Русский язык,
автор: vazh
Предмет: Русский язык,
автор: володечка
Предмет: Русский язык,
автор: IrinaNosok
Предмет: Химия,
автор: zdiana01
Предмет: Алгебра,
автор: svetylya476lya