//в принципе можно обойтись и без вычисления s. просто
//прерывать цикл при несовпадении двух шестеренок и
//выводить no
var
n, s, i, m, m1: int64;
begin
s : = 0;
read(n, m1);
for i : = 1 to n - 1 do
begin
read(m);
if m = m1 then
s : = s + 1;
m : = m1;
end;
if (s = n - 1) then
write('yes');
if (s < > n - 1) then
write('no');
end.
Сухроб944
09.12.2021
Матери́нская пла́та (. motherboard, mb, также используется название . mainboard — главная плата; сленг. мама, мать, материнка) — это сложная многослойная печатная плата, на которой устанавливаются основные компоненты персонального компьютера (центральный процессор, контроллер озу и собственно озу, загрузочное пзу, контроллеры базовых интерфейсов ввода-вывода). как правило, материнская плата содержит разъёмы (слоты) для подключения дополнительных контроллеров, для подключения которых обычно используются шины usb, pci и pci-express.
//ошибка в if.
//в принципе можно обойтись и без вычисления s. просто
//прерывать цикл при несовпадении двух шестеренок и
//выводить no
var
n, s, i, m, m1: int64;
begin
s : = 0;
read(n, m1);
for i : = 1 to n - 1 do
begin
read(m);
if m = m1 then
s : = s + 1;
m : = m1;
end;
if (s = n - 1) then
write('yes');
if (s < > n - 1) then
write('no');
end.