Нахождения и распечатки строки максимальной длины - VB

Узнай цену своей работы

Формулировка задачи:

Предварительно создать текстовый файл. Написать программу для нахождения и распечатки строки максимальной длины

Решение задачи: «Нахождения и распечатки строки максимальной длины»

textual
Листинг программы
with createobject("scripting.filesystemobject")
  with .opentextfile(.getfile(wscript.arguments(0)))
    while not .atendofstream
      s=.readline
      if len(s)>m then m=len(s):sm=s
    wend
  end with
end with
msgbox "Строка макс. длины" & vblf & sm

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4 из 5
Похожие ответы