Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1700 б
- arkasha_bortnikov 890 б
- Dwayne_Johnson 860 б
10 декабря 2022 20:07
811
Ввести 2 числа. Если их произведение отрицательно, умножить его на -2 и вывести на экран, в противном случае увеличить его в 3 раза и вывести на экран?
1
ответ
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.
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.
0
·
Хороший ответ
12 декабря 2022 20:07
Остались вопросы?
Еще вопросы по категории Информатика
запишите наименьшее четырехзначное число в пятеричной системе счисления. Помогите пожалуйста,буду очень благодарна...
Что называется основанием системы счисления?Выберите один ответ:a. сумма всех цифр системы счисленияb. арифметическая основа ЭВМc. отношение значений...
Напишите команды выборки для получения справки с использованием сложных логических выражений: • определить все даты до 17 марта, когда температура был...
Список A заполнили, а потом изменили. Чему равна сумма первого и последнего элементов полученного в итоге списка (то есть, A[0] + A[-1])? n = 2020 A...
Найди сумму положительных элементов массива, размерности 15, заполненного с помощью случайных чисел из промежутка (-15;23)....
Все предметы 
