Массив строк. - Pascal - Киберфорум

Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.57/7:

@Cyberdyne 1 / 1 / 2 Регистрация: 16.06.2009 Сообщений: 24

	Массив строк. 24.10.2009, 14:46. Показов 1484. Ответов 1 Метки нет (Все метки) Дан массив строк. Преобразовать массив так, чтобы при выводе на экран строки были выронены по левому краю экрана (на экране помещается 80 символов). 0

Лучшие ответы (1)

Сообщение: #319947

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

24.10.2009, 14:46

Ответы с готовыми решениями:

Дан целый массив из 5 строк и 3 столбцов.Упорядочить массив по возрастанию
Дан целый массив из 5 строк и 3 столбцов.Упорядочить массив по возрастанию элементов первого столбца. не мог бы ктонибудь сказать...

Сформировать массив номеров строк, не имеющих нулевых элементов. Вычислить сумму элементов остальных строк
Всем доброго времени суток. Помогите решить, кому не сложно. Так же, если можно блок схему составить. Заранее благодарен.

Дан двумерный массив. Просмотреть четные строки и создать одномерный массив из отрицательных элементов этих строк
Дан двумерный массив. Просмотреть четные строки и создать одномерный массив из отрицательных элементов этих строк. Произвести сортировку...

John_Pa9JIbHuK

Добрый самаритянин

1107 / 622 / 139

Регистрация: 31.03.2009

Сообщений: 2,567

25.10.2009, 09:51

Сообщение было отмечено Cyberdyne как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
a:array[1..100]of string;
i,j,k,m:integer;
begin
writeln('Ââåäèòå êîë.ïðåäëîæåíèé');
readln(k);
for i:=1 to k do
readln(a[i]);
for i:=1 to k do
for j:=1 to length(a[i]) do
begin
if m mod 80<>0 then
write(a[i][j])
else writeln;
inc(m);
end;
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

25.10.2009, 09:51

Помогаю со студенческими работами здесь

Дан одномрный массив A(N). Выполнить сортировку методом перестановок.Преобразовать в двумерный массив: количество строк и столбцов запрашивается польз
Завтра аттетстация, помогите пожалуйста!! Нужно сделать программу в Паскале. Вот задание: Дан одномрный массив A(N). Выполнить...

Дан массив В из N строк произвольной длины.Сформировать массив В,каждый элемент которого равен последнему символу соответствующей строки.
Дан массив В из N строк произвольной длины.Сформировать массив В,каждый элемент которого равен последнему символу соответствующей...

Задан массив. Получить из него новый массив путем деления элементов каждой из строк первого массива на элемент этой строки
Задан массив А. Получить из него новый массив путем деления элементов каждой из строк первого массива на элемент этой строки, стоящий по...

Массив строк
Нуб просит помощи! Пожалуйста, напишите текст вот такой вот программулины на Паскале: Дан массив строк. Найти все слова, содержащие...

массив строк
не могу осуществить проверку в массиве строк, с условием - вывести те строки в которых есть буква из первого элемента. можете привести...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

Наверх