Строка: Разбить исходную строку в соответствии с шириной поля вывода N - Turbo Pascal
Формулировка задачи:
Дана строка и число N. Разбить исходную строку в соответствии с шириной поля вывода N.
Решение задачи: «Строка: Разбить исходную строку в соответствии с шириной поля вывода N»
textual
Листинг программы
var s:string; n,i:byte; begin writeln('Введите строку'); readln(s); repeat write('Введите ширину поля вывода меньше длины строки'); readln(n); until n<length(s); for i:=1 to length(s) do begin write(s[i]); if i mod n=0 then writeln; end; end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д