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

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

Найти нужный

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

Помогите пожалуйста, решите сколько сможете!! Найдите значения выражений: 1) (1 v 1) v (1 v 0) 2) ((1 v 0) v 1) v1) 3) (0 & 1) & 1 4) 1 &a... Ученик задумал целое число от -10 до 10. Какова вероятность что квадрат этого числа меньше 10... Дети в детском лагере собирали грибы. Сегодня им попадались только лисички и маслята. Каждый нашел хотя бы один гриб, у 23 детей в корзинках были лиси... Основные функции текстового редактора.... Требуется спроектировать электрическую цепь ,показывающую итог тайного голосования комиссии в составе трех членов.При голосовании ЗА член комиссии наж...