Компьютерные дополненные программы математического моделирования и расчетов по математическим моделям. Черный А.А. - 101 стр.

UptoLike

Составители: 

101
9073 SCREEN 0: CLS : COLOR 2, 0
9074 PRINT "ВВОД I0=75 GOTO 9000-ПОВТОРЕНИЕ ПОСТРОЕНИЯ ГРАФИКА"
9075 PRINT "ВВОД I0=85 GOTO 7000-ПОВТОРЕНИЕ"
9076 PRINT " ВЫЧИСЛЕНИЙ ПОКАЗАТЕЛЕЙ Z(K5)"
9078 PRINT " С ИСПОЛЬЗОВАНИЕМ ЦИКЛОВ "
9079 PRINT " И ПОСТРОЕНИЕ ГРАФИКОВ"
9080 PRINT "ВВОД I0=95 GOTO 6830-КОНЕЦ": PRINT
9081 INPUT I0
9083 IF I0 = 75 GOTO 9000
9090 IF I0 = 85 GOTO 7000
9095 IF I0 = 95 GOTO 6830
10150 PRINT #1, "1.1."; "A1="; A1; "Z(1)="; Z(1); "Z1(1)="; Z1(1)
10160 PRINT #1, "1.2."; "E1="; E1; " Z(3)="; Z(3); "Z1(3)="; Z1(3)
10170 PRINT #1, "1.3."; "B1="; B1; "Z(2) = "; Z(2); "Z1(2) = "; Z1(2)
10180 RETURN
9073 SCREEN 0: CLS : COLOR 2, 0
9074 PRINT "ВВОД I0=75 GOTO 9000-ПОВТОРЕНИЕ ПОСТРОЕНИЯ ГРАФИКА"
9075 PRINT "ВВОД I0=85 GOTO 7000-ПОВТОРЕНИЕ"
9076 PRINT "              ВЫЧИСЛЕНИЙ ПОКАЗАТЕЛЕЙ Z(K5)"
9078 PRINT "              С ИСПОЛЬЗОВАНИЕМ ЦИКЛОВ "
9079 PRINT "              И ПОСТРОЕНИЕ ГРАФИКОВ"
9080 PRINT "ВВОД I0=95 GOTO 6830-КОНЕЦ": PRINT
9081 INPUT I0
9083 IF I0 = 75 GOTO 9000
9090 IF I0 = 85 GOTO 7000
9095 IF I0 = 95 GOTO 6830
10150 PRINT #1, "1.1."; "A1="; A1; "Z(1)="; Z(1); "Z1(1)="; Z1(1)
10160 PRINT #1, "1.2."; "E1="; E1; " Z(3)="; Z(3); "Z1(3)="; Z1(3)
10170 PRINT #1, "1.3."; "B1="; B1; "Z(2) = "; Z(2); "Z1(2) = "; Z1(2)
10180 RETURN




                                   101