Значения заданных переменных a, b и c перераспределите таким образом, что a, b, c станут, соответственно, наименьшим, средним и наибольшим значениями. в паскале : )

var a,b,c: integer; beginread(a,b,c); if (a> b) and (a> c) and (b> c) then write(a,b,c); if (a> b) and (a> c) and (b< c) then write(a,c,b); if (b> a) and (b> c) and (a> c) then write(b,a,c); if (b> a) and (b> c) and (a< c) then write(b,c,a); if (c> a) and (c> b) and (a> b) then write(c,a,b); if (c> a) and (c> b) and (a< b) then write(c,b,a); end;

Интерактивная программа - это компьютерная программа, для работы которой требуется взаимодействие с пользователем. Это взаимодействие может включать в себя ввод информации, изменение информации, управление информацией или иное манипулирование данными. Большинство программ являются интерактивными.

Примером таких программ может быть «Логика для малышей»,Baby Logics, Cifiri, «Развиваем память», Монтессори, "Веселые Картинки" — инструментальный пакет для создания и решения задач, связанных со сборкой на экране упорядоченного множества объектов текстовой и графической структуры и т. д.

R: =sqr(sqr(sqr(sqr(sqr(x))*x)*x))*x; // 45 r: =sqr(sqr(sqr(sqr(x))*x))*x; // 21 r: =sqr(sqr(sqr(sqr(*x; // 17 r: =sqr(sqr(sqr(x))*x)*x; // 11 пример полной программы, реализующей такой алгоритм // pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! function dec2bin(x: integer): string; begin   var t: =x;   var r: string: ='';   while t> =2 do (r,t): =(t mod 2+r,t shr 1);   result: =t+r end; function pow(x: real; n: integer): real; // быстрое возведение в степень "слева направо" begin   var m: =dec2bin(n);   result: =x;   for var i: =2 to m.length do begin       result: =sqr(result);       if m[i]='1' then result*=x       end end; begin   var x: =readreal('укажите основание х: ');   var n: =readinteger('укажите степень n: ');   writeln(x,'^',n,' = ',pow(x,n)) end. примеры укажите основание х: 0.918 укажите степень n: 39 0.918^39 = 0.0355520433528712 укажите основание х: -2 укажите степень n: 15 -2^15 = -32768 укажите основание х: 12.6 укажите степень n: 23 12.6^23 = 2.03480378921486e+25