Ввести 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

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

Найти нужный

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

Предложите свою классификацию компьютерных объектов файл и документ... Какая из ссылок тебе кажется наиболее безопасной www.drwebcom/index.php www.drweb.com/first www.drwed.com/first... Выберите команды с поясняющим текстом input('enter 1') print(5+12) int(input()) print('sum=') print(sum)... №1 запишите десятичные эквиваленты следующих чисел: a) D4(16) b) 1001111(2) c) 16C(16) №2 представьте в десятичной, и в двоичной системах счисле... ИЗВЕСТНО,ЧТО СООБЩЕНИЕ УЧИТЕЛЯ ,О ТОМ ЧТО К ДОСКЕ ПОЙДЁТ САША ОРЛОВ ,СОДЕРЖИТ 5 БИТОВ ИНФОРМАЦИИ . СКОЛЬКО УЧЕНИКОВ В КЛАССЕ?...