Напишите программу на языке Паскаль, которая при вводе положительного числа утраивает его значение, при вводе отрицательного числа увеличивает его на 10 единиц, при вводе 0 уменьшает его на 2 единицы.
xeniathcelykh
3
16.04.2020 05:34
0
Другие вопросы по теме Информатика
nshambulina
14.05.2020 15:46
ЕвгешаК2003
14.05.2020 15:46
Lraaq
14.05.2020 15:45
ВладВишня
14.05.2020 15:46
Zigmynda11
14.05.2020 15:46
Anna678901
14.05.2020 15:46
stetcenko87
14.05.2020 15:46
larisa2912200
14.05.2020 15:46
SnegRainbow
14.05.2020 15:46
Популярные вопросы
- Проект по теме мораль в жизни человека обществознание 6 класс заранее...
1 - Скорость автомобиля 62 км/ч. Расстояние которое он должен пройти 3081 км. Через...
3 - Abcd трапеция . проведены высоты bh , cm . ad =32 - большее основание ab=cd=20...
2 - Сократите дроби из вложения большое заранее!!...
2 - Почему стальной лист тонет в воде, а судно, корпус которого изготовлен из стальных...
3 - 783. Укажите номер правильного ответа:1) элемент множества чисел, кратных 3, -...
2 - 1 Мы пр..ехали к товарищ.. ждавш..му нас около пр..крас..ной виллы (в)течени.....
3 - Чи варто бути відкритим для суспільства приклад з літератури...
2 - два номера . Или хотяб один любой...
1 - Что делать если в одной игре нормальный фпс а вдругой нет? ( Например в фортнайте...
3
pascal
Объяснение:
program prog1;
var
a: real;
begin
Write('Введите число ');
ReadLn(a);
if a > 0 then a := a *3
else if a < 0 then a := a + 10
else a := a - 2;
Write('a = ', a);
end.