Дана переменная $a =10. выведите значение этой переменной на экран

в клетке а1 - 8

              а2 - 80

              а3 - 72

              в1 - 20

              в2 - 2 

и /н -п верхнее подчёркиванием \ш_

var myaf: array[0..30] of double;

для basic:

rem

cls

screen 7

input "a=",a

line (10,,50),2,bf