Qbasic. решить, : 1. дан файл целых чисел. вывести первый и последний элементы данного файла. 2. описать процедуру с(n, m), вычисляющую число сочетаний без повторений из n элементов по m.

DIM A%
CLS
OPEN "ABC.txt" FOR INPUT AS #1
INPUT #1, A
PRINT "Pervoe = ", A

WHILE NOT (EOF(1))
INPUT #1, A
WEND

PRINT "Poslednee = ", A
CLOSE #1
END

Примечание: файл ABC.txt должен лежать в одной папке с программой.

SUB CNM (N, M, C)
C = 1
FOR i = M-N+1 TO M
C = C*i
NEXT i

FOR i = 1 TO N
C = C/i
NEXT i
END SUB

CLS
DIM C&, N%, M%
N = 3
M = 10
CALL CNM(N, M, C)
PRINT C
END