Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 24.03.2014
Сообщений: 9
1

Найти минимальный элемент из элементов массива, расположенных на нечетных местах

22.12.2014, 17:04. Просмотров 1403. Ответов 2
Метки нет (Все метки)

Доброго времени суток! Вообщем возник очередной вопрос по одномерным массива. Нужно составить алгоритм к задаче: Найти минимальный элемент из элементов массива, расположенных на нечетных местах.
Попробовал, но почему то не работает. Вот что получилось у меня:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Program project1;
Var x: array[1..30] of integer;
    i,n,k: integer;
    min: real;
Begin
  writeln ('n=');
  readln (n);
  i:=1;
  while i<=n do
  begin
    readln(x[i]);
    i:=i+1
  end;
min:=x[2];
k:=2;
i:=4;
while i<=n do
begin
  if x[i]<min then
  begin
    min:=X[i];
    k:=i
  end;
i:=i+2
end;
writeln ('min=', min:6:1, 'k=', k);
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.12.2014, 17:04
Ответы с готовыми решениями:

Найти максимальный и минимальный элемент среди отрицательных элементов массива, расположенных на четных местах
В заданном одномерном массиве. Найти максимальный и минимальный элемент среди отрицательных...

Найти минимальный элемент среди элементов, расположенных на нечетных позициях массива
Пожалуйста, кто нибудь помогите.... решить задачу: Дан массив А(15). Найти минимальный элемент...

Найти минимальный элемент среди элементов, расположенных на нечетных позициях массива
Срочно! 2. Дан массив А(15). Найти минимальный элемент среди элементов, расположенных на...

Найти минимальный элемент среди элементов расположенных в нечетных строках массива
Дан массив А 5.5 найти минимальный элемент среди элементов расположенных в нечетных строках массива

2
охотник
1010 / 534 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
22.12.2014, 17:34 2
подправил...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Program project1;
Var x: array[1..30] of integer;
    i,n,k: integer;
    min:integer;
Begin
  write ('n=');
  readln (n);
  i:=1;
  while i<=n do
  begin
    write('x[',i,'] = ');
    readln(x[i]);
    i:=i+1
  end;
min:=x[1];
k:=1;
i:=3;
while i<=n do
begin
  if x[i]<min then
  begin
    min:=X[i];
    k:=i
  end;
i:=i+2
end;
writeln ('min = ', min,' в позиции ',k);
end.
2
0 / 0 / 0
Регистрация: 24.03.2014
Сообщений: 9
22.12.2014, 17:52  [ТС] 3
Спасибо за внимание, помогли)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.12.2014, 17:52

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Найти минимальный элемент среди элементов, расположенных в нечетных строках массива
Дан массивВ(5,5).найти минимальный элемент среди элементов, расположенных в нечетных строках...

Найти минимальный элемент среди элементов, расположенных в нечетных строках массива
Решите задачу с помощью двумерных массивов. Дан массив A. Найти минимальный элемент среди...

Найти минимальный элемент среди элементов, расположенных в нечетных строках массива
Цель лабораторной работы: получить навыки по обработке двумерных массивов с помощью языка Си. Дан...

Дан массив A[5,5]. Найти минимальный элемент среди элементов, расположенных в нечетных строках массива
Дан массив A. Найти минимальный элемент среди элементов, расположенных в нечетных строках...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.