Вывести коды ASCII- QBasic(Бейсик)

1
2
3
4
5
6
7
8
CLS
FOR i = 10 TO 60
PRINT CHR$(205);
NEXT
PRINT
FOR i = 10 TO 29
PRINT CHR$(186)
NEXT

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment