
Ефрем
5 год назад
вычислить функцию в Паскале,Пожалуйста посчитайте!!!

ОТВЕТЫ

Ilko
Oct 24, 2020
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.
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.
258
Смежные вопросы: