Сколько времени потребуется для ввода в память компьютера текста романа а. дюма "три мушкитёра" с сканера и программы для распознования текста, если известно, что на сканирование одной страницы уходит 3 с. ,на смену страницы в сканере - 2 с. ,на распознание страницы - 3 .с решением.

роман а. дюма " три мушкетёра " расположен на 581 странице. чтобы проделать всю выше описанную работу, нужно  (2 + 3 + 3) * 581 = 4648 с  ≈ 77 минут 30 секунд = 1 час 17 минут  30 секунд.

вроде так.

program xxx;

    var i, k : integer;

                  a : array [1..10] of real;

begin

  write('введите элементы массива а: ');

  for i: =1 to 10 do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to 10 do

        write(a[i]);

  k: =0;

  for i: =1 to 9 do

      if a[i]< > a[10] then k: =k+1;

  writeln('элементов отдичных от последнего -', k);

  readln

end.

паскаль же?

var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin

d: =d+k;

val(s,k,err);

end;

write (d);

end.