Решаем задачи Абрамян на Кумире. Array28

Array28. Дан массив $A$ размера $N$ . Найти минимальный элемент из его элементов с четными номерами: $A_2, A_4, A_6, …$ .

Решение от Дмитрия:

использовать Файлы П
алг Array_28 
нач
 цел файл
 цел i, N, NMax
 вещ Min

 NMax:=100

 целтаб arr[1:NMax]

 файл:=открыть на чтение ("Array28.txt")

 N:=0
 вывод "Входные данные: "
 нц пока не конец файла (файл) и N < NMax
  N:=N+1
  Фввод файл, arr[N]
  вывод arr[N], ", "
 кц
 закрыть(файл)

 Min := 0

 если N>1
  то Min:=arr[2]
 все

 нц для i от 4 до N шаг 2
  Min:=min(arr[i], Min)
 кц
 вывод нс, Min, нс
кон

использовать Файлы П

алг Array_28

нач

цел файл

цел i, N, NMax

вещ Min

NMax:=100

целтаб arr[1:NMax]

файл:=открыть на чтение ("Array28.txt")

N:=0

вывод "Входные данные: "

нц пока не конец файла (файл) и N < NMax

N:=N+1

Фввод файл, arr[N]

вывод arr[N], ", "

кц

закрыть(файл)

Min := 0

если N>1

то Min:=arr[2]

все

нц для i от 4 до N шаг 2

Min:=min(arr[i], Min)

кц

вывод нс, Min, нс

кон

Array28.txt

1 3 6 8 9 10

1	1 3 6 8 9 10

Другие задачи из раздела Array можно посмотреть здесь.

Решаем задачи Абрамян на Кумире. Array28

Комментарии:

Добавить комментарий Отменить ответ