Регистрация
kerisolomia
30.06.2021 02:21
Информатика
Есть ответ 👍

Из одного класса любят. ходить в кино.известно что 15 смотрели фильм" легенда номер 17",11 человек смотрели фильм"сталинград",из них 6 смотрели и " легенда номер 17" и "сталинград".сколько человек в классе?

201
308
Посмотреть ответы 2

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

Zeff
Zeff
4,5(1 оценок)
26 в
nilyu200513
nilyu200513
4,4(85 оценок)

program a; uses crt;

  var  s: string;   k,j,f: integer;   ch: char;   begin  read(s);   f: =0;   for k: =1 to length(s) do  for j: =1 to length(s) do  if ((s[k]=s[j]) and (k< > j)) then begin f: =1; ch: =s[k]; end;   if f=1 then writeln('yes - ',ch) else write('no');   readln;   end.

Популярно: Информатика