Страница 155 §3.4 номер 13, ГДЗ по информатике за 8 класс к учебнику Босовой

Информатика 8 класс 8класс ГДЗ к учебнику по информатике за 8 класс Босовой. Решения к номерам

Ответ и решение

program z13;var x,y:integer; begin write('Введи х>'); readln(x); if x<0 then y:=-1 else if x=0 then y:=0 else y:=1; writeln('y=',y); end.