![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
vanushka05 |
![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Реальное имя: Иван Репутация: ![]() ![]() ![]() |
Цитата program z3; uses crt; var myArr : array [1..100,1..100] of string [1]; i,j,n,m:integer; sym:char; s:string; begin clrscr; randomize; writeln('число строк'); readln(n); writeln('число столбцов'); readln(m); for i := 1 to n do begin writeln; for j:=1 to m do begin myarr[i,j]:=char(random(31)+128); write(myarr[i,j]:4); end; end; readln; writeln('Введите слово'); READLN(S); readln; end. Подскажите, пожалуйста, как написать программу, которая определяет можно ли из этих букв составить данное слово S?Массив состоит из строк, каждая строка из одного случайной буквы русского алфавита. |
![]() ![]() |
Айра |
![]()
Сообщение
#2
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 731 Пол: Женский Репутация: ![]() ![]() ![]() |
Цитата Оля, а не получится так, что, скажем, слово - "молоко", а в матрице - только одна буква "о", и по одной "м", "л" и "к"... По твоему методу будет считаться, что слово составить можно, формально же - нет, потому что букв "о" должно быть 3... Я об этом тоже подумала, но в условии не сказано, что букву нельзя брать несколько раз... Добавлено через 1 мин. Попробую осуществить и другой вариант, но не сейчас... Поздно уже))) |
![]() ![]() |
![]() |
Текстовая версия | 21.06.2025 5:49 |