Ввести 2 числа. Если их произведение отрицательно, умножить его на -2 и вывести на экран, в противном случае увеличить его в 3 раза и вывести на экран?

1 ответ

Посмотреть ответы

Megamozg

2205

program test;
var a, b: integer;
begin
write('Enter two numbers: ');
readln(a, b);
if a*b < 0 then
writeln(a*b*(-2))
else
writeln(a*b*3);
readln;
end.

Хороший ответ

12 декабря 2022 20:07

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

А3.При задании параметров абзаца в текстовом редакторе устанавливаются: 1)гарнитура,начертание,размер 2)поля,ориентация 3)отступ,интервал 4)стиль,шабл... Приведите примеры использования компьютерных моделей . Найдите соответствующую информацию в сети Интернет .... Задание 2... 2. Системное программное обеспечение - это А.относится к системному программному обеспечению и является главной программой в компьютере. Представляет... Какие типы данных вы знаете...