Дан одномерный массив a целого типа, состоящий из n частей. Отыскать

Дан одномерный массив a целого типа, состоящий из n частей. Отыскать в массиве 3-ий, считая слева вправо, элемент, имеющий данное целое значение x, т.е. найти индекс этого элемента. Начальный масс в и итог вывести на печать. Предусмотрев вывод извещения, когда сходственного элемента в массиве нет.

Задать свой вопрос
Эльвира Сучанова
Нужно было на языке С, ну что есть то есть, спасибо хоть на этом
1 ответ
  1. program n_1;
  2. uses printer;
  3. var n, i, s: integer;
  4. arr: array [1..10000] of integer;
  5. begin
  6. write ('Введите размер массива: ');
  7. readln (n);
  8. for i := 1 to n do begin
  9. write ('arr[',i,'] := ');
  10. readln (arr[i]);
  11. end;
  12. write ('Введите число для поиска: ');
  13. readln (s);
  14. i := 0;
  15. repeat
  16. inc(i);
  17. until (arr[i] = s) and (i = n);
  18. if (not (i = n)) or ((i = n) and (arr[i] = s)) then writeln(lst,s);
  19. end.
Никита Цурис
мне необходимо было на языке С
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт