Напишите программу, которая "переворачивает" заданное натуральное число. нужно : с

Код в паскале: uses crt; var n,k: integer; begin   clrscr; write('введите число: '); readln(n); repeat k: =k*10+(n mod 10); n: =n div 10; until(n=0); writeln('обратный порядок: ', k); readln; end.копировать тут(без скобок): {  uses crt; var n,k: integer; beginclrscr; write('введите число: '); readln(n); repeatk: =k*10+(n mod 10); n: =n div 10; until(n=0); writeln('обратный порядок: ', k); readln; end.  }

var sum, i, s: integer;   //обыявляем необходимые переменные

//sum - сумма, i - кол-во слогаемых, s - само слогаемоеbegin   //начало  sum : = 0; i : = 1; s : = 5;   //первое слогаемое = 5  while (sum < 324) do   //пока сумма меньше 324  begin    sum : = sum + s;   //к сумме прибавляем слагаемое    s : = s + 4;   //увеличиваем слогаемое    i : = i + 1;   //увеличиваем кол-во слогаемых  end;   writeln ('слогаемых: ');   // выводим кол-во слогаемых  write (i); end.   //конец

тоисть при работе с разными программами windows делает одинаковый интерфейс для них.  интерфейсы являются основой взаимодействия всех современных  информационных систем. если интерфейс какого-либо объекта (персонального компьютера, программы, функции) не изменяется (стабилен, стандартизирован), это даёт возможность модифицировать сам объект, не перестраивая принципы его взаимодействия с другими объектами (например, научившись работать с одной программой под  windows, пользователь с легкостью освоит и другие  — потому, что они имеют однотипный интерфейс).