Главная » Дан целочисленный массив... значения от 0 до 100...
17:00

Дан целочисленный массив... значения от 0 до 100...


Задание:

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 100 – баллы учащихся выпускного класса за итоговый тест по информатике. Для получения положительной оценки за тест требовалось набрать не менее 20 баллов. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и выводит минимальный балл среди учащихся, получивших за тест положительную оценку. Известно, что в классе хотя бы один учащийся получил за тест положительную оценку. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

Паскаль

Естественный язык

const N=30; 
var a: array [1..N] of integer; 
    i, j, min: integer; 
begin 
  for i:=1 to N do readln(a[i]); 
  ...
end.

Объявляется массив A из 30 элементов. 
Объявляются целочисленные переменные i, j и min.
В цикле от 1 до 30 заполняются все элементы массива A с 1-ого по 30-ый.
...

Си

 

#include<stdio.h> 
int main(void) { 
  const int N=30; 
  int a[N]; 
  int  i, j, min; 
  for (i=0; i<N; i++)
   scanf(″%d″, &a[i]); 
  ...
}

 

В качестве ответа Вам необходимо привести фрагмент программы (или описание алгоритма на естественном языке), который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и используемую версию языка программирования, например, Borland Pascal 7.0) или в виде блок-схемы. В этом случае вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии (например, в образце, записанном на естественном языке).

Решение:

Фактически нужно найти в массиве минимальный элемент среди всех элементов, которые больше или равны 20. В отличие от классического алгоритма поиска минимального элемента в массиве, здесь требуется «отсечь» все элементы, которые меньше 20, с помощью дополнительного условия.
Записываем в переменную min начальное значение, равное 100. В цикле от первого элемента до тридцатого сравниваем элементы исходного массива с 20. Если текущий элемент больше или равен 20, то сравниваем значение текущего элемента массива со значением переменной min. Если текущий элемент массива меньше min, то записываем в min значение этого элемента массива. Переходим к следующему элементу. После завершения цикла выводим значение переменной min. 
Недостающая часть программы может выглядеть так:

  1. min := 100; { не забыть начальные условия! }
  2. for i:=1 to N do 
  3.   if (a[i] >= 20) and (a[i] < min) then 
  4.     min := a[i]; 
  5. writeln ( min );

 


Похожие материалы:
Нашли ошибку на сайте? Напишите в комментариях!
Категория: Язык программирования: Паскаль | Просмотров: 54 | Добавил: Ученик | Рейтинг: 5.0/1