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

Ответы 1

  • var a,b,c:integer;beginwriteln('Введите 2 числа');read(a,b);if a=b then begina:=0;b:=0;end else  begin c:=a+b;a:=c;b:=c;end;writeln(a);writeln(b);end.
    • Автор:

      devon
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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