Дано целое число. Если оно является положительным, то вывести 1; если отрицательное, то вывести -1, если 0, то вывести 0.)Помогите
Ответы
Ответ дал:
0
var n:integer;beginreadln(n);if n>0 then writeln(1);if n<0 then writeln(-1);if n=0 then writeln(0);end.
Ответ дал:
0
var n:integer;
begin
readln(n);
if n>0 then writeln(1);
if n<0 then writeln(-1);
if n=0 then writeln(0);
end.
begin
readln(n);
if n>0 then writeln(1);
if n<0 then writeln(-1);
if n=0 then writeln(0);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад