Предмет: Информатика,
автор: Бананчик95
Ввести 2 числа. Если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.
Ответы
Автор ответа:
0
на каком языке програмирования?
Автор ответа:
0
var c, a,b: integer;
begin
Writeln ('Введите 1 ое число');
readln(a);
Writeln ('Введите 2 ое число');
readln(b);
IF (a*b)<0 then
c:=(A*B)*2
else
c:=(a*B)*1.5;
writeln(c);
end;
Вроде так
Похожие вопросы
Предмет: Английский язык,
автор: DLVR
Предмет: Русский язык,
автор: купа1
Предмет: Русский язык,
автор: Edo05082002
Предмет: Биология,
автор: saniavishnia
Предмет: Биология,
автор: saniavishnia