Скільки символів може містити зміна рядового типу​

лалклкшпоппрррррррррвлалвлалададаладпдадплплплалплплпллаллалалалплплпл в слове Предлог в каком формате будет ли это сделать и в клэш я не понимаю почему вы так же сообщить о спаме тоже есть спраут в клэш оф танк тигр в каком слове Подчистил в слове Предлог не каждый может я в клэш я сам с ним не было и в слове Подчистил я сам с ним в клэш я сам делаю не выйду и на какой стадии у нас все нормально и на сайте в слове звонить в слове Предлог я в слове Подчистил я сам с ним и на 2 под это приставка и в слове Предлог в каком формате будет стоить доставка до транспортной и

може містити 2048 символів

program raf105;

var a: array[1..100] of integer;

i,b: integer;

begin

writeln('вводите числа по очереди');

writeln('чтобы закончить введите 0');

i: =1;

readln(a[i]);

while a[i]< > 0 do

begin

  i: = i+1;

  readln(a[i]);

  if a[i]> =a[i-1]

    then b: =1;

end;

if b=1

  then writeln('последовательность не является убывающей.')

  else writeln('последовательность убывающая.');

end.

программа написана на языке pascalabc.net