в первом случае 5, во втором 8.
program z1;
uses crt;
var n,m,i:integer;
begin
repeat
writeln('Введите числа');
readln(n,m);
until n<m;
for i:=n to m do
begin
if i mod 2 =0 then write(i:4);
end;
end.
Var a, b : string; i, s, n: integer; begin n:=0; writeln('Введите слово'); readln(a); s:=length(a); writeln('Слово = ',a); writeln('Количество букв: ', s); end.
1. Отсканированный текст является растровым изображением, а не текстовым документом.
2. Для распознавания текста необходимо найти на изображении характерные признаки текста (символов) и интерпретировать их в строки.