Нахождения и распечатки строки максимальной длины - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
