ответ:
var
mn, st: set of char;
s, s1: string;
f: char;
i, k, p: integer;
begin
writeln('введите слово x');
readln(s);
for i : = 1 to length(s) do
mn : = mn + [s[i]];
writeln('введите слово y');
readln(s1);
for i : = 1 to length(s1) do
st : = st + [s1[i]];
if (st < = mn) and (length(s1) < = length(s)) then writeln('можно составить') else writeln('нелья');
end.
объяснение:
климат древней греции мало чем отличается от нынешнего. средняя температура не претерпела изменений с античных времен. она колеблется от 16 градусов в фессалии, где климат ближе к континентальному, до 19 градусов на кикладах. римский архитектор витрувий написал специальный трактат “об архитектуре” в 10 книгах. этот трактат свидетельствует о высоком уровне римской архитектурной мысли. большое развитие получила наука о праве; правоведение, или юриспруденция. таким образом, можно сделать вывод, что древнеримская и древнегреческая цивилизации сходны друг с другом. в некоторых случаях их культуры даже можно рассматривать как одну общую греко-римскую культуру
Поделитесь своими знаниями, ответьте на вопрос: