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

1
2
3
4
5
6
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