Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
10 декабря 2022 20:07
943
Ввести 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
Остались вопросы?
Еще вопросы по категории Информатика
Выполнить перевод 24ТБ в гигабайты и мегабайты, с помощью Microsoft Excel. Помогите,пожалуйста....
Приведите примеры: а) образной информационной модели б) знаковой информационной модели в) смешанной информациооной модели...
Установите соответствие между свойствами информации и их описаниями. Помогите! Очень нужно. Буду благодарна...
Помогите, пожалуйста! Два игрока играют в следующую игру. Перед ними лежит куча из 6 камней. Игроки берут камни по очереди, за один ход можно взять 1,...
...