Работа 3.8 Упр.15 ГДЗ Семакин 10 класс (Информатика)

Задача

Рассмотрим вариант решения задания из учебника Семакин, Хеннер, Шеина 10 класс, Бином: 15. Имеется строка, содержащая буквы латинского алфавита и цифры. Вывести на экран длину наибольшей последовательности цифр, идущих подряд. *Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания. 10 semakin10 pract/3-8/15 98

Подробный ответ

Нужно просмотреть строку посимвольно и считать длину текущей последовательности цифр. Если очередной символ — цифра, увеличиваем счётчик текущей серии. Если символ не цифра, сравниваем текущую длину с максимальной и, если нужно, обновляем максимум, после чего обнуляем текущий счётчик.

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

var l, m, i: integer;
s: string;
begin
  l := 0;
  m := 0;
  readln(s);
  for i := 1 to Length(s) do
    if s[i] in [‘0’..’9′] then Inc(l)
    else begin
      if l > m then m := l;
      l := 0;
    end;
  if l > m then m := l;
  writeln(m);
end.

Ответ: программа выводит длину наибольшей последовательности цифр, идущих подряд.

Оцени решение

← Предыдущий Следующий →

Сообщить об ошибке

Общая оценка

4.2 / 5

Другие учебники