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

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

Найти нужный

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

Пожалуйста напишите краткое сообщение "о происхождении слова алгоритм"... Ответьте развернуто: наиболее точным аналогом реляционной базы данных может служить с примерами... Для хранения текста в восьмибитовой кодировке требуется 10 Кбайт. Сколько страниц займет текст, если на странице размещается 40 строк по 64 символа в... Какие информационные услуги компьютерных сетей Вам известны? Каково их назначение?... Из каких частей состоит имя файла?...