Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
0 / 0 / 0
Регистрация: 22.09.2019
Сообщений: 18
1

Квадрат в прямоугольнике

25.10.2019, 19:23. Показов 1314. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Задача:
У Вас в руках карта местности, представленная решеткой N*M символов. Выведите прямоугольник - фрагмент этой карты, с левым верхним углом в позиции R,C (R - номер строки, C - номер столбца) с стороной L.


Формат ввода:
N M – количество строк(N) и столбцов(M) (N<=16, M<=20)
s[1] - первая строка карты
s[2] - вторая строка карты
...
s[N] - последняя строка карты
R C L

Формат вывода:
L строк по L символов в каждой

Пример ввода:
5 4
.#..
@...
..#.
@@##
....
3 2 2


Пример вывода:
.#
@#
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
25.10.2019, 19:23
Ответы с готовыми решениями:

Разместить в большом прямоугольнике прямоугольнике поменьше
Необходимо &quot;упаковать&quot; в большой прямоугольник (в данном случае это модель монтажной платы)...

Картинка в прямоугольнике
Здравствуйте!! Можете дать ответ пожалуйста на 1 вопрос, если сможете. У меня в программе рисуется...

Треугольник в прямоугольнике?
Определить, поместится ли равнобедренный треугольник с основанием c и высотой h в прямоугольник со...

Круг в прямоугольнике
Поместиться ли круг с радиусом р в прямоугольник со сторонами а и в?

1
Модератор
10085 / 5425 / 3357
Регистрация: 17.08.2012
Сообщений: 16,599
26.10.2019, 08:48 2
Лучший ответ Сообщение было отмечено N1NT3NDO как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var
  N, M, R, C, L, i, j:integer;
  s: array[1..16, 1..20] of char;
 
begin
  readln(N, M);
  for i := 1 to N do
    begin
      for j := 1 to M do read(s[i, j]);
      readln
    end;
  readln(R, C, L);
  for i := R to R + L - 1 do
    begin
      for j := C to C + L - 1 do write(s[i][j]);
      writeln
    end
end.
Если использовать массив строк, то программа упрощается, а переменная M становится ненужной.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  N, R, C, L, i, j:integer;
  s: array[1..16] of string[20];
 
begin
  readln(N, N);
  for i := 1 to N do readln(s[i]);
  readln(R, C, L);
  for i := R to R + L - 1 do
    begin
      for j := C to C + L - 1 do write(s[i][j]);
      writeln
    end
end.
В программах нет проверки корректности вводимых данных и защиты от выхода индекса за границы массива.
1
26.10.2019, 08:48
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
26.10.2019, 08:48
Помогаю со студенческими работами здесь

Прямоугольник в прямоугольнике
У Вас в руках карта местности, представленная решеткой N*M символов. Выведите прямоугольник -...

Прямоугольник в прямоугольнике
Помогите решить задание на паскале используя логические операторы: else и if .

Нарисовать крест в прямоугольнике
В квадрате я нарисовал, а вот в прямоугольнике с неравными сторонами никак не соображу, помогите...

Размещение окружностей в прямоугольнике
Добрый день. Дан прямоугольник шириной W и высотой H. Даны N1 окружностей диаметром D1, N2...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Как проверить, что файл НЕ существует с помощью Bash
bytestream 25.01.2025
В системном администрировании проверка существования файлов является фундаментальной операцией, особенно при написании скриптов на Bash. Правильная обработка ситуаций, когда файл отсутствует,. . .
Как проверить, что строка пустая, неопределена или null в JavaScript
bytestream 25.01.2025
При разработке веб-приложений на JavaScript разработчики регулярно сталкиваются с необходимостью проверки строковых значений на различные состояния. Валидация данных является критически важным. . .
Как проверить существование ключа в объекте или массиве в JavaScript
bytestream 25.01.2025
При разработке веб-приложений на JavaScript программисты постоянно сталкиваются с необходимостью работать с объектами и массивами. Эти структуры данных являются фундаментальными элементами языка и. . .
Как создать ArrayList из массива (array) в Java
bytestream 25.01.2025
При разработке программного обеспечения на языке Java программисты часто сталкиваются с необходимостью эффективного управления наборами данных. Массивы и ArrayList являются двумя фундаментальными. . .
Как сгенерировать случайные целые числа (int) в указанном диапазоне в Java
bytestream 25.01.2025
В программировании генерация случайных чисел является важнейшим инструментом для решения множества практических задач. От создания игровых механик до реализации алгоритмов машинного обучения, от. . .
Как сделать, чтобы grep выводил строки до и после найденной
hw_wired 25.01.2025
Утилита grep стала незаменимым инструментом для поиска и фильтрации информации в Unix-подобных операционных системах. Эта командная утилита позволяет осуществлять поиск строк, соответствующих. . .
Как клонировать определенную ветку в Git
bytestream 24.01.2025
Одной из ключевых функций Git является возможность клонирования веток, что позволяет создавать локальные копии удаленных репозиториев и работать с определенными версиями проекта. Этот механизм. . .
Как в цикле обойти строки DataFrame в Pandas Python
bytestream 24.01.2025
DataFrame представляет собой одну из основных структур данных в библиотеке Python Pandas, которая организует информацию в виде двумерной таблицы с строками и столбцами. Эта структура данных особенно. . .
Как получить имя текущей ветки в Git
bytestream 24.01.2025
При работе с Git часто возникает необходимость определить имя текущей ветки, в которой ведется разработка. Знание текущей ветки является критически важным аспектом для эффективного управления. . .
Как отсортировать массив объектов по значению поля объекта в JavaScript
bytestream 24.01.2025
При разработке веб-приложений на JavaScript разработчики часто сталкиваются с необходимостью работать с массивами объектов. Эти структуры данных представляют собой упорядоченные наборы элементов, где. . .
Ошибка "src refspec master does not match any" при пуше коммита в Git
bytestream 24.01.2025
При работе с системой контроля версий Git разработчики нередко сталкиваются с различными ошибками, одной из которых является сообщение "src refspec master does not match any". Эта ошибка возникает. . .
Как округлить не более двух цифр после запятой в JavaScript
bytestream 24.01.2025
При работе с числами в JavaScript разработчики часто сталкиваются с необходимостью округления десятичных значений до определенного количества знаков после запятой. Это особенно важно при работе с. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru