Помагите из 20 элементов найти максимальный элемент

Question

Помагите из 20 элементов найти максимальный элемент

Answer 1

#include
#include
const int N=10;
clrscr;
main()
{int Max,index,i,A[N];
printf("vvedi massiv\n");
for(i=0;i{printf("vvedite A[%d]=",i);
scanf("%d",&A[i]);
}
Max=A[0]; index=0;
for(i=1;i{
if(A[i]>Max)
{
Max=A[i]; index=i;
}
}
printf("\n max ravno %d",Max);
printf("\n index raven %d",index);

}

Answer 2

Предоставлю решение на Pascal

Program Zn;
const N=21;
var m:array[1..N] of integer;
max,i:integer;
Begin
max:=-30000;
For i:=11 to N do begin
Writeln('Введите эллемент массива');
Readln(m[i]);
if max
end;
writeln('Максимальный эллемент массива=',max);
end.

(Проверено и от компелировано на Pascal.NET)