Предмет: Информатика,
автор: kovalevartem38
Помогите пожалуйста, очень срочно
В Паскале
Приложения:
Ответы
Автор ответа:
0
===== PascalABC.NET =====
begin
var x := ReadReal('x =');
var y: real;
if x >= 1 then
y := 1
else if x <= -1 then
y := -1
else
y := 0;
Print(y)
end.
Похожие вопросы
Предмет: Українська література,
автор: 333cat
Предмет: Другие предметы,
автор: FoxyYouTuber777
Предмет: Математика,
автор: danagubkin
Предмет: Математика,
автор: Paw11
Предмет: Математика,
автор: 5SVETLANA5