• Ввести с помощью read(); два трехзначных числа N1 и N2 (оба integer). В этих числах обменяли младшие цифры. (Например,

Ответы 1

  • var n1,n2,n11,n12,n13,n14,n15,n16,sum1,sum2:integer; {описание переменных}beginread (n1,n2); {считывание N1,N2}n11:=((n1 div 100)); {поиск значений первой, второй и третьей цифры первого числа}n12:= (n1- n11*100) div 10;n13:= n1- n11*100 - n12*10;n14:= n2 div 100; {аналогично со вторым числом}n15:= (n2-n14*100) div 10;n16:= n2-n14*100-n15*10;sum1:=n11*100+n12*10+n16; {перестановка последних цифр местами}sum2:=n14*100+n15*10+n13;writeln(sum1,\' \',sum2,\' \',sum1+sum2); {вывод данных}end.
    • Автор:

      chaney
    • 3 года назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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