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

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

Найти нужный

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

Как перевести километры в час в метры в секунду в Паскале... Сделать программу на c++ :Даны строки: имя фамилия отчество , Нужно чтобы программа выдавал отчества в алфавитном порядке, как это можно сделать?... Какую ситуацию можно рассматривать как циклическую конструкцию? Разговор по телефону Работа светофора Уборка квартиры Прогулка по улице... 1.Объем сообщения содержащего 4096 символов составил 1/512 часть Мегабайта. Какова мощность алфавита, с помощью которого записано это сообщение? 2.Для... Состояние в котором пользователь находится или находился. Информатика. Срочно пж в слове 6 букв...