Есть ответ 👍

Решить : ) даны два числа если их произведение отрицательно то увеличить его в 2 раза иначе уменьшить в 1,5 раз

110
139
Посмотреть ответы 2

Ответы на вопрос:


Прошу. program by_relhem; var a,b,c: integer; d: real; begin writeln ('введите да числа, разделяя их пробелом'); read (a,b); c: =(a*b); if c< 0 then d: =c*2 else d: =c/1.5; writeln ('ваш ответ: ',d); end.

...........................

Объяснение:

Популярно: Информатика