Ответы на вопрос:
Var a: integer; begin readln(a); if (a< 100) then a: =a+1 else a: =a-1; writeln(a); end.
Популярно: Информатика
-
Синфой ! разборчивая невеста при выборе женихов руководствуется...
shvbur7512.09.2022 21:24 -
Что не является типовой диаграммой в таблице а) круговая б) сетка...
катерринкаа31.10.2021 05:34 -
Ккакой категории относится функция если а) б) статистической в)...
timoxaept18.10.2022 22:41 -
Составить программу( в python), определяющую принадлежит ли точка...
Алшиния27.08.2020 21:33 -
Представьте в виде синтаксических диаграмм: «цифра : : = 0 | 1...
Kursova8218.01.2020 13:20 -
Дано х у если оба отрицательных вывести на экран...
Lapka29810.04.2023 13:46 -
На координатной плоскости отметьте точки со следующими координатами,...
6valeria628.08.2020 09:27 -
Найдите высоту правильной шестиугольной призмы если сторона основания...
SocialКрип01.02.2023 07:05 -
Прямоугольный лист бумаги разрезали по прямой на две части.затем...
superman33307.02.2023 06:59 -
На циферблате электронных часов отображается текущий день месяца,...
den4ik14311.09.2022 16:19