Создать константу-массив дней недели- QBasic(Бейсик)

DIM WeekDays(1 TO 7)
FOR I = 1 TO 7
   READ WeekDays(I)
NEXT
 
DATA Su, Mo, Tu, We, Th, Fr, Sa

Leave a Comment