Регистрация
081120071
Есть ответ 👍

Делаем вывод: если монголы орут то значит они говорят:

276
461
Посмотреть ответы 3

Ответы на вопрос:

egorpolozuk
egorpolozuk
4,7(48 оценок)

про ёжика

наверное

зачем это?

помоги269
помоги269
4,4(3 оценок)

хер его знает

Объяснение:

кира631
кира631
4,6(88 оценок)

ответ:

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.

объяснение:

Популярно: Другие предметы