Question

СРОЧНО ИНФОРМАТИКА ПОЖАЛУЙСТА ((

Answer 1

Ответ:

m:=1;

for i:=1 to 10 do

if A[i]>=A[m] then m:=i;

writeln (A[m]);