Ответы на вопрос:
//pascalabc.net версия 3.3.1590 от 03.12.2017//если программа не запускается, то обновите версию var x: integer; begin readln(x); writeln(sign(x)); end.
Популярно: Информатика
-
Виртуальная реальность Дополненная реальность Устройства визуализации Источник...
Sheri104.04.2020 02:19 -
Кто такие смурфики мне очень интересно узнать если что это для ютуб канала...
alenabarsukova2026.05.2023 02:25 -
Как узнать, является ли поле ключевым...
ziksharof11.04.2020 12:36 -
ответ :мысык. Кубик 100000%дурыс...
Fixir201.06.2021 17:46 -
Замени каждую букву предыдущей в алфавите сёлмбнб...
lerafrank2602226.01.2022 09:04 -
Противоположные по смыслу предложение катя ходит в школу...
малика207128.03.2022 17:48 -
Решить на языке си(с), не си++ строка может содержать произвольное количество...
228Cracker22809.05.2021 09:46 -
5. для каких из чисел ложно высказывание: (число 75) и не (число чётное)...
Lera096811hk18.08.2021 23:44 -
Укажите значения величины s после выполнения следующей команды. s = 1;...
pashakort21.02.2023 14:09 -
((1/\1)\/0)/\(0\/1) найдите значение логического выражения...
dionakavinep08o5z21.04.2022 01:04