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

Question

Лейла

20 августа, 00:33

+1

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