Сколько всего существует штрих кодов из 8 штрихов Некоторые из которых закрашенны, а некоторые - нет, но при этом крайние штрихи закрашены?​

64 ну так у меня во всяком случаи

Объяснение:

великобритания - лондон

греция - афины

италия - рим

нидерланды -

франция - париж

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.