балов
С клавиатуры вводится число. Увеличить в три раза, если оно больше нуля. Уменьшить на 4, если оно меньше нуля. pascal abc
Gasdsa
1
08.05.2020 12:46
0
Другие вопросы по теме Информатика
helpplease14
24.09.2019 08:10
Yaryycher
14.05.2020 11:17
vstef
23.08.2019 12:50
супермарио3
23.08.2019 12:50
Dirijabl
26.05.2019 11:50
alenazayka200
26.05.2019 11:50
123456789надежда1234
26.05.2019 11:50
Artem574189
15.12.2020 07:58
норочка3
15.12.2020 07:57
Популярные вопросы
- Текстовый редактор – приложение, предназначенное … для управления ресурсами...
1 - Барлетова сіль KCIO3 при нагріванні каталізатора розкладається з виділення...
2 - Поставить знаки, объяснить, подчеркнуть, что нужно.1.Он безусловно справится...
3 - 6. Наречие обозначает признак другогопризнака.А) Её всегда отличали изысканные...
2 - Що йдеця у творі русалонька із (7 в)...
1 - )Выполнить кроссворд на тему Кройка и шитье Подробности Выполнить кроссворд...
2 - Как к Герасиму относилась Барыня? Муму...
3 - 3. Какой материк открыли русские мореплаватели...
3 - Соч Письмо ЗАДАНИЕ 2 Рассмотрите иллюстрацию. Представъте себя на месте...
3 - 1. Какая из стадий развития человека самая ранняя? 1) «человек прямоходящий»...
1
var a:integer;
begin
read(a);
if a>=0 then a:=a*3
else a:=a-4;
write(a);
Объяснение: