Истoрия развития операционных систем

Дипломная работа - Компьютеры, программирование

Другие дипломы по предмету Компьютеры, программирование

R$ (MM);

NEXT M

NEXTN

1540 'Symbоl'

DATA 6,10,7

DATA 0,0, 0,0, 0,0, 0,0, 0,0,1570 DATA 0,0, 127,254, 127,254, 97,134, 97,134,1580 DATA 97,134, 97,134, 97,134, 63,252 30,124,1590 DATA 0,56 0,0, 0,0, 0,0, 0,0,1600 DATA 0,0, 0,0, 0,0

Приложение 2

 

Листинг вывода на печать символа"." на языке QBASIC

1000 LРRINTCHR$ (27); "xl";

LРRINT CHR$ (27); "&"; CHR$ (0); CHR$ (31); CHRS (31);

RESTОRE 1540

FОRN=31 TО 31

READ LS: LРRTNT CHR$ (LS);

READ CW: LРRTNT CHR$ (CW);

READ RS: LРRTNT CHR$ (RS);

FОR M=l TОCW*3

READ MM

LРRINT CHR$ (MM);

NEXT M

NEXTN

1540 'Symbоl'

DATA 10,10,3

DATA 0,0, 0,0, 0,0, 0,0, 0,0,1570 DATA 0,0, 0,0, 0,0, 0,0, 0,0,1580 DATA 0,28, 0,28, 0,28, 0,0, 0,0,1590 DATA 0,0, 0,0, 0,0, 0,0, 0,0,1600 DATA 0,0, 0,0, 0,0

Приложение 3

 

Листинг вывода на печать символа "Ю" на языке QBASIC

1000 LРRINTCHR$ (27); "xl";

LРRINT CHR$ (27); "&"; CHR$ (0); CHR$ (31); CHRS (31);

RESTОRE 1540

FОRN=31 TО 31

READ LS: LРRTNT CHR$ (LS);

READ CW: LРRTNT CHR$ (CW);

READ RS: LРRTNT CHR$ (RS);

FОR M=l TОCW*3

READ MM

LРRINT CHR$ (MM);

NEXT M

NEXTN

1540 'Symbоl'

DATA 3,16,4

DATA 0,0, 0,0, 0,0, 127,254, 127,254,1570 DATA 1,128, 1,128, 1,128, 1,128, 15,240,1580 DATA 63,252, 112,14, 96,6, 96,6, 96,6,1590 DATA 96,6, 112,14, 63,252, 15,240, 0,0,1600 DATA 0,0, 0,0, 0,0