Ввести 2 числа. Если их произведение отрицательно, умножить его на 8 и вывести на экране, в противном случае увеличить его в 1,5 раза и вывести на экран. (Написать программу, начертить блок-схему).

Question

Хамурза

14 ноября, 16:45

+1

Ответы (1)

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

Гульжанат · Answer 1

Program qwerty;

var a, b:integer; c:real;

begin

read (a, b) ;

c:=a*b;

if c<0 then c:=c*8

else c:=c*1.5;

write (c) ;

end.