Ввести c клавиатуры массив из 5 частей, отыскать малый из них.   





Ввести c клавиатуры массив из 5 элементов, отыскать малый из них.


Пример:


Введите 5 чисел:


4 15 3 10 14


малый элемент 3




Задать свой вопрос
Степа Окульский
в Pascal
1 ответ
Uses crt;
var a:array[1..5] of integer; i,min:integer;
begin
  writeln('Введите 5 чисел:');
  for i:=1 to 5 do
    read(a[i]);
  min:=a[1];
  for i:=1 to 5 do
    if a[i]lt;min then min:=a[i];
  writeln;
  write('малый элемент ',min);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт