Невнятно как-то сформулировано - то индексы найти, то массива нету... Пишу, как понял.
ОТДЕЛ Задание+; ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПЕР массив: РЯД 15 ИЗ ВЕЩ; сч, найдено: ЦЕЛ; найденное, индексы: ДОСТУП К РЯД ИЗ ВЕЩ;
УКАЗ найдено := 0; СОЗДАТЬ(индексы, РАЗМЕР(массив) - 1); ОТ сч := 1 ДО РАЗМЕР(массив) - 1 ВЫП ЕСЛИ массив[сч] = массив[0] ТО найденное[найдено] := сч; УВЕЛИЧИТЬ(найдено) КОН КОН; ЕСЛИ найдено = 0 ТО Вывод.Цепь("Не найдено.") ИНАЧЕ СОЗДАТЬ(индексы, найдено); ОТ сч := 0 ДО найдено - 1 ВЫП индексы[сч] := найденное[сч] КОН; найденное := ПУСТО КОН
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПЕР
массив: РЯД 15 ИЗ ВЕЩ;
сч, найдено: ЦЕЛ;
найденное, индексы: ДОСТУП К РЯД ИЗ ВЕЩ;
УКАЗ
найдено := 0;
СОЗДАТЬ(индексы, РАЗМЕР(массив) - 1);
ОТ сч := 1 ДО РАЗМЕР(массив) - 1 ВЫП
ЕСЛИ массив[сч] = массив[0] ТО
найденное[найдено] := сч;
УВЕЛИЧИТЬ(найдено)
КОН
КОН;
ЕСЛИ найдено = 0 ТО Вывод.Цепь("Не найдено.")
ИНАЧЕ
СОЗДАТЬ(индексы, найдено);
ОТ сч := 0 ДО найдено - 1 ВЫП
индексы[сч] := найденное[сч]
КОН;
найденное := ПУСТО
КОН
КОН Задание.
Объяснение:
1) мы присваиваем значение переменной a, то есть теперь а=10
2) мы присваиваем значение переменной b
путём поставления полученных и исходных данных
находим значение,которое будет присвоено переменной b
b=150 div 10
150:10=15 div- это целая часть от деления
пример:
19 div 5 : 3 (19 делим на 5 и пишем в ответ целую часть, то что с лева от запятой, то есть 3)
в нашем случае в ответ идёт весь набор чисел т.к. все они целые,а именно получается 15. Теперь b=15
3) находим конечное значение a
10-15/3
10-5=5
т.к. деление выполняется в первую очередь