GIT.Harvie.CZ
/
mirrors
/
Programs.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
c36368033621a8593f88b7fbef1066d628fe4c7f
[mirrors/Programs.git]
/
NOTY1.BAS
1
SCREEN 0
2
color 0,15
3
cls
4
INPUT " NOTA 1 " ;N1
5
CLS
6
INPUT " NOTA 2 " ;N2
7
CLS
8
INPUT " NOTA 3 " ;N3
9
CLS
10
INPUT " NOTA 4 " ;N4
11
CLS
12
INPUT " NOTA 5 " ;N5
13
CLS
14
INPUT " NOTA 6 " ;N6
15
CLS
16
INPUT " NOTA 7 " ;N7
17
CLS
18
INPUT " NOTA 8 " ;N8
19
CLS
20
INPUT " NOTA 9 " ;N9
21
CLS
22
INPUT " NOTA 10 " ;N10
23
CLS
24
INPUT " STISKNI *ENTER* " ;V
25
CLS
26
SOUND N1*12,12
27
SOUND N2*12,12
28
SOUND N3*12,12
29
SOUND N4*12,12
30
SOUND N5*12,12
31
SOUND N6*12,12
32
SOUND N7*12,12
33
SOUND N8*12,12
34
SOUND N9*12,12
35
SOUND N10*12,12
36
PRINT " KONEC "
37
FOR I=0 TO 300
38
NEXT I
39
END
\1a
This page took
0.320658 seconds
and
3
git commands to generate.