Предмет: Информатика,
автор: Lola2280304
ПОМОГИТЕ С ИНФОРМАТИКОЙ
ПАСКАЛЬ
Ввести два числа. Если их произведение отрицательно, умножить его на -2 и
вывести на экран, в противном случае увеличить его в 3 раза и вывести на экран
Ответы
Автор ответа:
0
===== PascalABC.NET =====
begin
var (a, b) := ReadInteger2;
var c := a * b;
Print(c < 0 ? -2 * c : 3 * c)
end.
Интересные вопросы
Предмет: Русский язык,
автор: ыа34
Предмет: Русский язык,
автор: BarSer5
Предмет: Українська література,
автор: shepik2013
Предмет: Математика,
автор: lisihkaolesia
Предмет: Математика,
автор: Аноним