Программирование в языке Паскаль (!!), не С++.
1. Написать программу, которая считывает с клавиатуры массив из 10 элементов и выводит минимальный элемент массива.
2. Написать программу, которая считывает с клавиатуры массив из 10 элементов и выводит максимальный элемент массива и его индекс.
3. Написать программу, которая считывает с клавиатуры массив из N элементов (N<1000) и выводит максимальный и минимальный элементы массива и их среднее значение.
Нужно минимум две задачи. Заранее спасибо)
Ответы
Ответ дал:
2
Лови первую задачку! Остальные не знаю:с
var a: array[1..10] of integer; i,min: integer;
begin
for i:= 1 to 10 do
begin
writeln( 'a[',i,']=');
readln (a[i]);
end;
min:= 32687;
for i:= 1 to 10 do
if a[i]< min then min:= a[i];
writeln('min=',min);
end.
var a: array[1..10] of integer; i,min: integer;
begin
for i:= 1 to 10 do
begin
writeln( 'a[',i,']=');
readln (a[i]);
end;
min:= 32687;
for i:= 1 to 10 do
if a[i]< min then min:= a[i];
writeln('min=',min);
end.
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад