Даны две числовые переменные a и b необходимо присвоить переменной a значение переменной b, переменной b необходимо присвоить значение переменной a, без использования дополнительных переменных..

Var a,b: real; begin read(a,b); swap(a,b); write(a,b); end.

Program u2; const n=6; var i,max: integer; a,b: array [1..n] of integer; begin a[1]: =2; a[2]: =5; a[3]: =7; a[4]: =-2; a[5]: =0; a[6]: =8; writeln('a: '); for i: =1 to n do write(a[i]: 3); writeln; writeln('b: '); for i: =1 to n do    begin   b[i]: = (a[i]-1);   write(b[i]: 3);   end; writeln; max: =a[1]; for i: =1 to n do   begin   if a[i]> max then max: = a[i];   b[i]: =max;   end; writeln('new b: '); for i: =1 to n do write(b[i]: 3); writeln; end. результат: a:   2   5   7 -2   0   8 b:   1   4   6 -3 -1   7 new b:   2   5   7   7   7   8

чтобы найти это, нужно было перевести это "число", состоящее из букв в десятичное число. в десятичной системе отсчёта мы используем цифры от 0 до 9. если взять одиннадцатиричную, то 10-ой цифрой будет буква a. и так

по этому принципу: q - 26, u - 30, e - 14, n - 23.

далее по правилу перевода в десятичную систему нужно умножить число, соответсвующее букве, на число, равное n-ричности (например, если система шестнадцатиричная, то умножаем на 16), возведённое в степень, равную порядковому положению первого числа - 1. например, в данном слове queen q = 26, оно 5 слева на право. пусть, система будет шестнадцатиричной. тогда: 26*16^4.

дальше, из условия следует: "в некоторой системе счисления число из 9 цифр для запоминания было равно queen и основание системы было наибольшее из возможных для данного формата номера телефона."

для поиска правильного основания нужно проверять по первому числу. правильное основание - 78. проверяем: 26*78^4=96 239 14 56. девять цифр, всё верно. по такому же принципу можно найти значения для остальных букв:

u=30*78^3=14236560 (здесь уже не важно, сколько цифр, мы будем складывать полученные числа), e=14*78^2=85176, e=14*78^1=1092, n=23*78^0=23.

теперь просто складываем и получаем: 962391456+14236560+85176+1092+23= 976714307-ответ.