1. Информатика
  2. Написать на Паскале программу,

Написать на Паскале программу, выводящую на экран
-1, если введённое число X отрицательное,
0 – если число X=0,
1, если число X положительное.

valiente valiente    3   05.04.2020 15:19    1

Ответы
vborisenko75 vborisenko75  12.10.2020 15:40

PascalABc.NET

begin

   Sign(ReadReal).Print

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
alinaantonova06 alinaantonova06  22.02.2021 21:36
В шашечном турнире принимали участие шесть игроков из разных городов России: Воронежа, Златоуста, Самары, Томска, Уфы и Ростова. В первом туре Антон играл с представителем...
ZzitizZ ZzitizZ  22.02.2021 21:31
При решении этой задачи вложенный условный оператор бу-дет иметь алгоритм:если х 0)тоу вычислить по формуле у = х – 12Иначеесли х = 0 тоу вычислить по формуле у =5Иначе...
Dirol3434 Dirol3434  22.02.2021 21:31
Для чого потрібні вкладені цикли...
Tim4ik0205 Tim4ik0205  24.09.2021 17:20
Якщо ваш персональний комп ютер Використовується кількома користувачами, то для захисту конфіденційних даних потрібно,...
WoudBack1 WoudBack1  24.09.2021 17:20
7. Окушыны кызыктырган китап 5-сореде орналаскан деген хабар 3 бит акпарат болды. Стеллажда канша соре бар? 8. Корапта 8 ак және 32 кок шардан туратын жалпы саны 40...
Mariam21072003 Mariam21072003  24.09.2021 17:12
между населёнными пунктами A.B.C.D.E построены дороги протяжённость которых приведена в таблице Определите длину кратчайшего пути между пунктами B и D передвигаться...
lanceva3 lanceva3  01.06.2019 10:10
Используя цикл repeat, вывести на экран первые n членов последовательности: 1, 3, 7, 15, 31, 63, (turbo pascal)...
kubikrubik201 kubikrubik201  01.06.2019 10:10
Каковы основные элементы области диаграммы и их назначение?...
itkrg itkrg  01.06.2019 10:10
Тема: одномерные массивы. в паскале в массиве даны 10 целых чисел. нужно найти сумму четных чисел....
юлд1 юлд1  22.04.2021 08:14
Объем файла равен 2590 Kb, разрешение экрана 1280 × 3700 точек. Чему будет равна глубина цвета? 4 бит6 бит18 бит ​...

Популярные вопросы