alia1234567891
31.01.2023 15:31

1.Сканирование текста
Сколько сколько времени потребуется для ввода в память компьютера текста на 83 страницах с сканера и программы ABBYY FineReader если известно что что на сканирования 1 страницы уходит три секунды на смену страницы в сканере 9 секунд на распознавание страницы 2 секунды
2.Решение задачи
Андрей может вводить текстовую информацию со скоростью 133 символов в минуту выясни сколько времени понадобится для того чтобы ввести в память компьютера напечатанный текст на 428 страницах каждая страница содержит 45 строк в каждую строку входит в среднем 53 символа
5.программой переводчиком является
ABBYY Lingvo
Paint
MS Excel
ABBYY FineReader
6.Автоматизированный перевод
Автоматизированный перевод может также включать все словари на компакт-дисках одноязычные и многоязычные
• Программы для распознавания текста
•Программы для создания изображений
•Программы для проверки грамматики,которые так же встраиваются в текстовые редакторы или дополнительные программы.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
arakelyankrist
02.06.2021 10:25
Program task1;
var  number, max, min, ost, digit :integer;
begin
  readln(number);  max:= 0; min:= 9;  while number > 0 do  begin    digit:= number mod 10;    if digit < min then      min:= digit;    if digit > max then      max:= digit;    number:= number div 10;  end;  writeln('Минимальная цифра: ',min);  writeln('Максимальная цифра: ',max);
end.

program task2;
var  number, digit, sum, p :integer;
begin
  readln(number);  sum:= 0; p:= 1;  while number > 0 do  begin    digit:= number mod 10;    sum:= sum + digit;    p:= p * digit;    number:= number div 10;  end;  sum:= sum * 3;  if sum > p then    writeln('Утроенная сумма больше произведения');  if p > sum then    writeln('Произведение больше утроенного произведения');
end.
0,0(0 оценок)
Ответ:
Anif
30.10.2021 06:24
var
  str, num: string;

begin
  readln(str); //str := 'Day 10, mice 8: "Year" 7 is a mistake 91.';
  foreach c: char in str do
    if (Char.IsDigit(c)) then
      num += c;
  for j: byte := 1 to length(num) - 2 do
    for i: byte := 1 to length(num) - 1 do
      if (num[i] < num[i + 1]) then
      begin
        str[1] := num[i];
        num[i] := num[i + 1];
        num[i + 1] := str[1];
      end;
  if (Integer.Parse(num) > 0) then
  begin
    while (num[num.Length - 1] = '0') do
      num.Remove(num.Length - 1);
    writeln('Да' + #13 + num);
  end
  else
    writeln('Нет');
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота