Дан текстовый файл, содержащий текст, выровненный по левому краю. Выровнять текст по центру - VB

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

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

Дан текстовый файл, содержащий текст, выровненный по левому краю. Выровнять текст по центру, добавив в начале каждой непустой строки нужное количество пробелов (ширину текста считать равной 50). Строки нечетной длины перед центрированием дополнять слева пробелом.

Решение задачи: «Дан текстовый файл, содержащий текст, выровненный по левому краю. Выровнять текст по центру»

textual
Листинг программы
Function MidS$(ByVal S$, Optional W& = 50)
MidS$ = Space$(W)
Mid(MidS$, (W - Len(S) + 1) / 2 + 1) = S
End Function

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


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

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

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