Page 38 - 33
P. 38
35 PRINT А$(3);
40 INPUT СЕ
Крапка з комою в кінці оператора 35 забезпечує ввід числа в тому ж
рядку. Після вводу числа доцільно відразу ж зростити його з текстом.
45 А$(3) =А$(3)+STR$(CE)
Після цього змінна А$(3) буде складатись з тексту і числа. Аналогічно
запрограмуємо ввід решти даних.
50 PRINT А$(4);
55 INPUT TDOP
60 А$(4) =А$(4)+STR$(TDOP)
65 PRINT А$(5);
70 INPUT HR
75 А$(5) =А$(5)+STR$(HR)
80 PRINT А$(6);
85 INPUT HD
90 А$(6) =А$(6)+STR$(HD)
95 PRINT А$(7);
100 INPUT VM
105 А$(7) =А$(7)+STR$(VM)
110 PRINT А$(8);
115 INPUT CD
120 А$(8) =А$(8)+STR$(CD)
Обчислювальний блок
125 VR=HR/(HR/VM+TDOP): А$(11) =А$(11)+STR$(VR)
130 C=CE/VR+CD/HD: А$(12) =А$(12)+STR$(C)
38