10 CLS
20 PRINT
30 PRINT "MJ GET fu-sen.webcrow.jp/datetime.php"
40 INPUT Y
50 INPUT M
60 INPUT D
70 INPUT H
80 INPUT N
90 PRINT
100 PRINT Y;"/";
110 IF M<10 PRINT "0";
120 PRINT M;"/";
130 IF D<10 PRINT "0";
140 PRINT D;" ";
150 IF H<10 PRINT "0";
160 PRINT H;":";
170 IF N<10 PRINT "0";
180 PRINT N