Кто хорошо знает паскаль! ) написать на языке паскаль)) дано натуральное число. верно ли, что количество всех его цифр, есть четное число?

Var
  a, n: integer;
 
begin
  n := 0;
  read(a);
  while a > 0 do
  begin
    a := a div 10;
    n := n + 1;
  end;
  if(n mod 2 = 0) and (n <> 0) then write('Верно')
  else write('Неверно');
end.

Алгоритм решения следующий:

Сначала считывается введенное слово в переменную. Далее, в цикле от начала слова и до его конца проверяется, является ли текущая буква, равной искомой, то есть букве "а". Если такая буква найдена, то выводится её позиция в слове.

А теперь комментарий по каждой из строчек кода.

// Блок объявления переменных
var a:string; 
var i:integer;
// Начало программы
begin
// Ввод слова
writeln('Введите слово');
// Считывание слова
read(a);
// Цикл от 1 до длины считанного слова
for i:=1 to length(a) do begin
// Условие на то, является ли текущая буква заданной
if (a[i]='а') then begin
// Если является, вывод её позиции на экран
writeln('Найдена буква “а”, ее позиция:' , i);
// и прерывание дальнейшего цикла, выход из него
break;
// Завершение блока "if"
end;
// Завершение цикла
end;
// Завершение программы
end.

Однако удобнее использовать специализированные менеджеры загрузки файлов (например, FlashGet, GoIZilla, ReGet и др.). Такие менеджеры позволяют увеличить скорость загрузки за счет разбиения файлов на части и одновременной загрузки всех частей. Кроме того, они позволяют продолжить загрузку файла после разрыва соединения с сервером, содержат средство поиска файла на других серверах файловых архивов, позволяют архивировать файлы в процессе их загрузки и так далее.

Пользователю предоставляется в числовом и графическом виде подробная информация о процессе загрузки файла (текущая и средняя скорость загрузки, процент выполнения загрузки, ориентировочное время загрузки и др.).

Менеджеры загрузки файлов интегрируются в браузеры и при активизации ссылки на файл в окне браузера начинают процесс его загрузки.