PascalЗаполнить массив из 20 целых чисел. Подсчитать количество схожих "соседей" в
Pascal
Заполнить массив из 20 целых чисел. Подсчитать количество схожих "соседей" в массиве.
Необходимо РЕШЕНИЕ ПО Программке 9 КЛАССА(Т.Е. БЕЗ ТОГО, ЧТО ПРОХОДЯТ В 10-11 КЛАССАХ)
Варвара Шолундова
Необходимо подсчитать количество пар или самих чисел?
Ева Чернокожина
И заполнять как: самому либо рандомом?
Элина Авсенева
Наполнять рандомом.
Антон
Посчитать кол-во одинаковых соседей. К примеру, у числа 2 соседи 1и 3, у числа 4 соседи 3 и 5. Означает, у этих чисел схожие соседи это числа 3, необходимо посчитать их кол-во
Егор Хорохин
Хотя, можно и самому наполнять. Как для вас удобнее
Аделина
Ага, то есть, такую пару троек считать за 1?
Колька Криштопян
Да
2 ответа
Пиченков
Андрюха
Ничего не работает
Александр Жулиткин
https://ibb.co/d1TBkR - Что именно?
Ира
Всё одинаково не работает
Карина Ривочкина
Так ты скрин пошли, где непосредственно ошибка
Ева Чернякова
У меня компьютер сломался. Я проверяю в приложении на телефоне
Вова Галазов
Var a:array[1..1000] of integer;
k, I, n: integer;
begin
k:=0;
readln(n);
for i:=1 to n do
readln(a[i]);
for i:=1 to n-1 do
if a[i]=a[i+1] then
k:=k+1;
writeln(k);
end.
k, I, n: integer;
begin
k:=0;
readln(n);
for i:=1 to n do
readln(a[i]);
for i:=1 to n-1 do
if a[i]=a[i+1] then
k:=k+1;
writeln(k);
end.
Юра Губинский
Ничего не работает
Елена Доркина
у меня в var стоит I вместо махонькой буквы ii ( почему то исправляется автоматом) пробуй исправить
Есения Азоренко
Ге работает
Vasilisa Kirsankina
что пишет?
Светлана Астафонова
У меня комп сломался. Я проверяю в приложении на телефоне
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов