Дано целое число. если оно является положительным, то прибавить к нему 1; иначе, если отрицательным, то вычесть из него 2, иначе заменить его на 10. составить блок-схему и программу паскаль абс
fftoes
2
20.09.2019 20:10
4
Другие вопросы по теме Информатика
simkinaalinoschka
23.09.2019 13:05
Vjjiychyuy
08.05.2020 09:07
лукашук
08.05.2020 09:07
kotik12345566
22.02.2021 18:47
кристина0052368
22.02.2021 18:46
Diana2004250
22.02.2021 18:41
susannamuratov1
19.03.2020 22:17
Аксинья21
29.06.2019 18:00
MariMQ
29.06.2019 18:00
Популярные вопросы
- Скаким растением в народе связывают майские заморозки и похолодание, потому...
1 - Сократить отношения 135: 72 и 45/36...
1 - Установи порядок действий. вычисли. (5*9+21: *9+14)-72: 9...
3 - Написать сочинение недоросоль тема: кто виноват в бедах простаковой?...
2 - Город, в котором произошёл первый бой ильи муромца в былине “илья муромец...
1 - Выполни деление с остатком ,73/16= 48/15= 55/13= 64/17= 78/19= 97/18=...
2 - Кроссворд на тему искусство в нашей жизни по музыке...
1 - 2х-3(х-1)=4+2(х-1) решить уравнение...
1 - Тело в течение первых десяти секунд t=10 проходит путь s=25 найти ускорение...
1 - Установи порядок действий. вычисли. 6*(12-4*2)+6*6: 9-4*2*2...
3
begin
readln(a);
if a >= 0 then
if a = 0 then a := 10
else Inc(a)
else a -= 2;
write(a);
end.