Апреежрнивще составьте из этих букв слово ОЧЕНЬ(кто пишет не по теме бан)​

var n,x,k: integer;
 
//Функция нахождения суммы цифр числа n
function sum(n: integer): integer;
var s: integer;
begin
  s:= 0; //в начале сумма равна 0
  while (n>0) do //Пока число положительное выполняем цикл
    begin
      s:= s+n mod 10; //Находим остаток от деления числа n на 10, суммируем  
      n:= n div 10;  //Находим целую часть от деления числа n  на 10
    end;
  sum := s;
end;
 
begin
  readln(n);
  x:= n;   
  k:= 0;   
  while (x>0) do //пока число положительное продолжаем выполнять цикл
    begin
      x:=x-sum(x); //от числа отнимаем сумму его цифр
      inc(k); //увеличиваем счетчик
    end;
  writeln('k=', k);
end.

Роль воды в жизни человека неоспоримо высока. Она служит основой для хорошего функционирования всего организма. В воде находятся различные вещества, характер происхождения которых разнообразен, как органический, так и неорганический. Она составляет почти три четверти веса взрослого человека. Ведь именно вода создала Землю, сделала ее такой, как сейчас, породила жизнь. Больше того, вода – самое удивительное вещество на Земле, и чем больше мы о ней узнаём, тем больше поражаемся.
Вероятно, мало кто из вас задумывался над удивительными свойствами воды, и это, пожалуй, понятно: ведь вода повсюду окружает нас, она очень обычна на нашей планете. Вода занимает 3/4 поверхности Земли. Около 1/5 суши покрыто твердой водой (льдом и снегом), добрая половина ее всегда закрыта облаками, которые состоят из водяных паров и мельчайших капелек воды, а там, где никаких облаков нет, в воздухе всегда есть водяные пары. Очень обычна она на нашей планете, даже тело человека на 71 процент состоит из воды. При утрате 6—8% влаги от массы тела человек впадает в полуобморочное состояние, при потере 12% и выше процентов влаги наступает смерть.