• .Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной большее из этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.

Ответы 1

  • PrograBID(БОЛЬШЕЕ ИЗ 2-Х ЧИСЕЛ);

    var a,b,c:integer;

     begin

     readln(a,b);

     if a>b

     then c:= a

     else c:=b;

    writeln(c);

    end

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years