Предмет: Информатика,
автор: sanapapirus
Найти наименьший элемент массива размером N, элементы которого вводятся с клавиатуры.(В PascalABC,пожалуйста)
Ответы
Автор ответа:
1
Программа:
Pascal:
const N = 5;
var
arr: array[1..N] of integer;
i, min: integer;
begin
min := MAXINT;
writeln('Введите ', N, ' чисел в массив: ');
for i := 1 to N do readln(arr[i]);
writeln('Массив: ', arr);
for i := 1 to N do if arr[i] < min then min := arr[i];
writeln('Минимальное число массива: ', min);
end.
sanapapirus:
Благодарю
Похожие вопросы
Предмет: Английский язык,
автор: 89271723319
Предмет: Окружающий мир,
автор: jekaMIX777
Предмет: Русский язык,
автор: denskvortsov9Den
Предмет: Алгебра,
автор: Ариша02
Предмет: Химия,
автор: Кастиэлька