Помогите написать программу ** массив Qbasic Создать массив,хранящий результаты...

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

Помогите написать программу на массив Qbasic
Создать массив,хранящий результаты соревнований 8 спортсменов по бегу на коньках.Определить,лучший результат,худший результат и среднее время пробега дистанции.


Информатика (90 баллов) | 27 просмотров
Дан 1 ответ
0 голосов

A(I) - массив
L - лучший рез-т
H - худший рез-т
S - средний рез-т
О - общая сумма рез-тов
CLS
DIM A(8)
FOR I=1 TO 8 STEP 1
INPUT A(I);
NEXT (I)
L = A(1)
H = A(1)
О=0
FOR I=1 TO 8 STEP 1
IF LIF H>A(I) THEN H=A(I)
О=O+A(I)
NEXT (I)
S=O/8
останется только вывод полученных результатов

(304 баллов)
0

Спасибо