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

1 ответ

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

Megamozg

2190

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

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

Найти нужный

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

Помогите, пожалуйста!!! Очень надо!!!! К завтрашнему дню!!!!!! Запишите следующие числа в 8-разрядном формате со знаком (отрицательное число в дополни... Сколько школьных учебников емкостью 350 кб можно разместить на трехдюймовой дискете... Подскажите, пожалуйста, чему равно значение Суперпозиций σ((х2, σ(х3,х2)) и σ(х3, 0, 0, 1) ?... Какое устройство оказывает вредное воздействие на человека: принтер, монитор, системный блок или клавиатура?... Вещественные числа имеют тип данных: 1)real 2)integer 3)boolean 4)string...