Предмет: Информатика,
автор: dimac6045
Напишите программу на языке Паскаль, которая при вводе положительного числа утраивает его значение, при вводе отрицательного числа увеличивает его на 10 единиц, при вводе 0 уменьшает его на 2 единицы.
Ответы
Автор ответа:
1
Ответ:
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.
Интересные вопросы
Предмет: Русский язык,
автор: 01111256
Предмет: Русский язык,
автор: daliyaabyasova
Предмет: Русский язык,
автор: marusya011
Предмет: Алгебра,
автор: borisovaekater2
Предмет: Алгебра,
автор: popovd234Ender