Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

В одномерном массиве a(10) найти значение и индекс наименьшего из положительных элементов

5-9 класс

Akmaral0575 03 июня 2014 г., 16:30:46 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Igodka
03 июня 2014 г., 19:21:04 (9 лет назад)

var a:array[1..10] of integer;

       i,min,j:integer;

begin

min:=maxint;

j:=0;

for i:=1 to 10 do 

begin

readln(a[i]);

if (a[i]<min) and (a[i]>0) then

begin

min:=a[i];

j:=i;

end;

end;

writeln('Наименьший элемент массива равен',min,' индекс равен',j);

end.

Ответить

Другие вопросы из категории

Представлен исполнитель R: среда: клетчатое поле 4 на 6, система команд исполнителя: вверх; вниз; вправо; влево; закрасить. Исполнитель, находясь в лктке,

может проверить условия: клетка закрашена/ не закрашена, сверху (снизу, справа, слева) край/ не край. В результате выполнения алгоритма испонитель перешел в клетку 5. Укажите номер исходной клетки( из пронумерованных).

Сколько места занимает палитра в файле, где используются 64 цвета? 128 цветов?

Меня заколебало ночью домашку делать))))) Так что, прошу помощи))
{-_-}

-[!!!]-
...!!...

Читайте также

В одно мерном массиве А(10) найти количество положительных и отрицательных элементов

Программа сделана правильно,но как только ее хочешь запустить там пишет "введите длину массива"какое число нужно вводить?



Вы находитесь на странице вопроса "В одномерном массиве a(10) найти значение и индекс наименьшего из положительных элементов", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.