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
   33   34   35   36   37   38   39   40   41   42   43