Помогите решить Язык программирования qbasik

0 голосов
42 просмотров

Помогите решить
Язык программирования qbasik


image

Информатика (23 баллов) | 42 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Min=A(1)
K=1
FOR I=1 TO N
If A(i)   Min=A(I)
   K=I
   END IF
NEXT I
G=A(K)
A(K)=A(N)
A(N)=G