Ответы на вопрос:
Var a: integer; begin write('введите число: '); readln(a); if a > =0 then a: =a-10 else a: =a+10; writeln('полученное число: ',a) end. пример работы программы: введите число: 13 полученное число: 3
Популярно: Информатика
-
МИЛ56707.07.2021 23:39
-
Limda77717.07.2022 06:34
-
hcggchhcfuj11.09.2021 05:00
-
точно225.02.2023 01:32
-
cygrobik11124.10.2022 23:45
-
dashhach30.06.2022 22:21
-
dimabarabanov19.11.2020 05:37
-
lol271030.06.2023 18:17
-
ARISKA200619.03.2023 00:44
-
star060208.04.2020 02:59