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

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

Найти нужный

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

Int* arr = (int*)malloc(N * sizeof(int)); выручайте, спросили что такое (int*)... На рисунке приведен фрагмент электронной таблицы. Определите, чему будет равно значение, вычисленное по следующей формуле =СУММ(B1:C4)+F2*E4-A3 СРОЧНО... Угадайте правило шифрования и запишите верные слова 1) ниофмрцаяи 2)никемпри 3) еперадач 4) никчисто ... Укажите отношение для пары "процессор и системный блок": 1.Является элементом множества 2.Входит в состав 3.Является разновидностью 4.Является при... Постройте в программе Word граф отношений, связывающих понятия: сообщение канал связи компьютерная сеть скорость передачи информации локальная сет...