Варианты программ для анализа:

Вариант А 10 INPUT N 15 T=0 20 F=1 30 F=F*N 40 T=T+F 40 N=N-1 50 IF N>0 THEN GOTO 30 60 PRINT F 70 PRINT T	Вариант Б 10 S=0 20 A=0 30 B=0 40 A=A+1 50 B=B+1 60 IF A=2*B THEN S=S+1 70 IF B<4 THEN GOTO 50 80 IF A<3 THEN GOTO 40 90 PRINT S	Вариант В 10 PRINT "ENTER A NUMBER" 20 INPUT N 30 D=1 40 D=D+1 50 K=N/D 70 IF K=INT(K) THEN PRINT D: END 80 IF D 90 PRINT N
Вариант Г 10 PRINT "ENTER A NUMBER" 20 INPUT N 25 T=0 26 M=N 30 IF N/2=INT(N/2) THEN N=N/2 ELSE N=3*N+1 35 T=T+1 36 if N>M THEN M=N 40 PRINT N 50 IF N<>1 THEN GOTO 30 60 PRINT "STEPS: ";T 70 PRINT "MAX: ";M	Вариант Д 10 SCREEN 9 20 CLS 30 X=100 40 Y=120 50 R=30 60 C=INT(1+RND*15) 70 DT=0.1 75 G=1 80 VX=5 90 VY=3 100 CIRCLE(X,Y),R,0 110 X=X+VX*DT 120 Y=Y+VY*DT 130 CIRCLE(X,Y),R,C 135 VY=VY+G*DT 140 IF X<=R OR X>=600-R THEN VX=-VX 150 IF Y<=R OR Y>=300-R THEN VY=-VY 160 GOTO 100	Вариант Е 10 PRINT "RESHAEM URAVNENIJE X^3+9X=20" 20 PRINT "VVEDITE LEVUJU GRANICU PROMEZHUTKA" 30 INPUT A 40 PRINT "VVEDITE PRAVUJU GRANICU PROMEZHUTKA" 50 INPUT B 60 IF A^3+9*A>20 THEN Z=1 ELSE Z=-1 70 C=(A+B)/2 80 Y=C^3+9*C 90 IF (Y-20)*Z>0 THEN A=С ELSE B=C 100 PRINT A;"<х<";B 110 IF (B-A)>0.0001 THEN GOTO 70 120 PRINT "X=";(A+B)/2

Варианты рисунков: