Задание:
Пожалуйста помогите народ там в паскале надо решить: Дано слово А и слово В. Можно ли слово В составить из букв слова А, если каждую букву слова Аможно использовать неоднократно? Можно ли из слова А составить слово В, если в слове В можно использовать буквы слова А по количеству сколько раз они встречаются в слове А? Плииз народ оч надо меня убьют если не решу
Решение:
var a,b: string; i,j,k: integer; beginreadln (a,b); for i: =1 to length (b) dofor j: =1 to length (a) doif a[j]=b[i] then begin inc (k); break; end; if k=length (b) then writeln ('mojno') else writeln ('nelzya'); end. var a,b: string; c: array[1… 256] of boolean; i,j,k: integer; beginreadln (a,b); for i: =1 to length (b) dofor j: =1 to length (a) doif (a[j]=b[i]) and (c[j]=false) then begin inc (k); c[j]: =true; break; end; if k=length (b) then writeln ('mojno') else writeln ('nelzya'); end.
Знаете другой ответ?