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

Question

Лейла

19 марта, 21:48

+4

Ответы (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.