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

1 ответ

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

Megamozg

2180

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

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

Найти нужный

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

Какой тип принтера целесообразно использовать для печати финансовых документов? Фотографий? Рефератов и книг?... Среди множеств: книга, бензин, врач, молоко, строитель, учебник, жидкость, справочник, человек, найдите шесть пар, между которыми существует отношение... Комплекс программ, обеспечивающих совместное функционирование всех устройств компьютера и предоставляющих пользователю доступ к его ресурсам, – это..... Условие Вы - агент специального отдела "Кибердетективы", занимающийся анализом киберпространства и выявлением скрытых сообщений. Ваша команда получил... Как в программировании обозначается модуль...