Дан массив из тридцати элементов. вывести индексы всех элементов, равных по значению а. если таких элементов нет - вывести сообщение с текстом "no solution". формат входных данных на первой строке через пробел записаны целые числа arri (|arri|≤1000) — элементы массива. на второй строке записано целое положительное число a. формат выходных данных строка, содержащая искомые индексы, либо знадпись "no solution", если таковых нет.

279

386

Посмотреть ответы 2

Ответы на вопрос:

gjjfdkjgfyijh

Информатика

4,4(86 оценок)

Var i, x: integer; a: array[1..30]of integer; b: boolean; begin b : = false; for i : = 1 to 30 do read(a[i]); readln(x); for i : = 1 to 30 do if(a[i] = x) then begin b : = true; write(i, ' '); end; if (b = false) then write('no solution'); end.

Ros15011

Информатика

4,8(59 оценок)

Данный символ является изображаемым

Популярно: Информатика

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку