• Предмет: Информатика
  • Автор: вишневицкая
  • Вопрос задан 10 лет назад

Функция sign(x) задана аналитически cледующим образом 1, если х>0; sign(x)= 0, если х=0; -1, если х<0; Введите значение х, выведите значение функции sign(x). ребят помогите пожалуйста написать программу в паскале

Ответы

Ответ дал: Kitsu
0

function sign(x:integer):integer;
begin
if x>0 then sign:=1;
if x=0 then sign:=0;
if x<0 then sign:=-1;
end;

var i:integer;
begin
readln(i);
writeln(sign(i));
end.

Ответ дал: Няняша
0

Филимон ты тупица ха-ха-ха-ха

Похожие вопросы