'Первая задача
CLS
SCREEN 12
INPUT "N"; N
DIM A(N)
FOR I = 1 TO N
INPUT A(I)
NEXT
SUM = 0
FOR I = 1 TO N
SUM = SUM + A(I)
NEXT
SREDNEE = SUM / N
PRINT SUM
PRINT SREDNEE
'Вторая задача
CLS
SCREEN 12
INPUT "N"; N
DIM A(N)
FOR I = 1 TO N
INPUT A(I)
NEXT
MAX = 0
FOR I = 1 TO N
IF A(I) > MAX THEN MAX = A(I)
NEXT
PRINT MAX