Дано 2 числа
необходимо большее из чисел утроить (х3) , а в случае равенства чисел выдать сообщение "числа равны"​

obizyana88 obizyana88    3   10.11.2019 18:49    0

Ответы
ОляМалинка ОляМалинка  11.09.2020 13:16

//pascal

var A,B : integer;

begin

 readln(A, B);

 if A = B then

   writeln('Числа равны.')

 else

 begin

   if(A > B) then

     A *= 3

   else

     B *= 3;

   writeln(A, ' ', B);

  end;

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика