Сколько различных бусин из 10 камушков можно составить из неограниченного количества черных и белых камушков?
122
306
Ответы на вопрос:
Var f: text; s1,s2: string; begin assign(f,'file.txt'); reset(f); while not eof(f) do begin readln(s1); if not eof(f) then begin readln(s2); if s1< > s2 then begin writeln(s1); writeln(s2); writeln end end end; close(f) end.
Популярно: Информатика
-
333ч09.03.2022 00:12
-
smokenmyr07.07.2020 12:58
-
kuzmov5523.11.2020 04:50
-
zaharsd09.12.2020 23:54
-
zlatovlaska01.08.2022 16:20
-
linda31038427.04.2021 01:02
-
elektroo6717.11.2021 13:50
-
nshexovceva1821.03.2022 22:55
-
Westix27.08.2020 23:06
-
геля56987818.04.2021 11:03