Напишите программу которая увеличивает введенные число с клавиатуры в 3 раза если оно отрицательное и уменьшает на 8 если оно положительное

Question

Феофила

7 февраля, 22:55

+2

Ответы (1)

Знаете ответ на вопрос?

Виталинка · Answer 1

Program z123;

var a: integer;

begin read (a) ; if a > 0 then a : = a - 8 else a : = a * 3; writeln (a) ; end.