Информатика, опубликовано 2018-08-22 19:17:20 by Гость
Напишите программу вычисляющую значение функции y=1 при x
Ответ оставил Гость
Var x,y:integer;
begin
write(x = );
readln(x);
if x>0 then y:=1
else if x=0 then y:=0 else y:=-1;
writeln(y = ,y);
end.
Пример:
x = -5
y = -1
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на