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

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

Найти нужный

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

Реферат на тему: история вычислительной техники кратко... Несжатое растровое изображение размером 128х128 пикселей занимает 8 Кб памяти. Каково максимальное возможное число цветов в палитре изображения?... 1. Каково происхождение термина «презентация»? 2. Какая информация может быть размещена на слайде презентации? 3. Что общего в технологиях гипертекст... A=[ 1,2,3,4,5 ] n=A.index(3) Определите значение переменной n после выполнения фрагмента программы.... Для какого из приведенных значений числа Х истинно высказывание НЕ(Х<3)И(Х<4)? Вот варианты ответов: 5, 2,3,4...