トップページtech
204コメント32KB

BASICで1行ずつプログラムを組もう

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさんNGNG
1 CLS
0153デフォルトの名無しさんNGNG
MANNKO 22 THEN 44:
0154デフォルトの名無しさんNGNG
RENUMBER
0155デフォルトの名無しさんNGNG
155 REM KOKOMADEYONDA
0156デフォルトの名無しさんNGNG
156 REM 2005
0157デフォルトの名無しさんNGNG
157 age
0158デフォルトの名無しさん05/01/18 20:54:39
990 END
0159デフォルトの名無しさん05/01/18 21:58:54
980 GOTO 1000
0160デフォルトの名無しさん05/01/18 23:11:31
990 LABEL0: I% = INKEY$(1)
0161デフォルトの名無しさん05/01/20 17:50:21
5 GOTO 1000
0162デフォルトの名無しさん05/01/20 18:13:31
650 PRINT "みなさん 寒いので灯油とライターを用意してください"
660 GOTO >>152の家
670 着火!!
0163デフォルトの名無しさん05/01/24 19:26:27
680 IF >>152の家 = DNQ呆手 ELSE GOTO 710
690 PRINT "放火犯は>>162です。K察を呼びます。"
700 CALL TELEPHONE(110)
0164秘密K殺隊員11号05/01/28 15:18:24
>162
お前を放火未遂罪で逮捕する!
0165デフォルトの名無しさん05/01/28 15:19:21
時代遅れスレのためsage放置推奨
0166デフォルトの名無しさん05/02/19 20:59:05
710 '
720 CLS 3
730 GOSUB *AGE
730 GOTO 800
740 '
750 *AGE
760 LET SLEDNO%=1
770 IF SLEDNO%<>1 THEN GOTO 760
780 RETURN

0167デフォルトの名無しさん2005/03/31(木) 19:23:25
790 REM 全員プリンタ用意!
800 LPRINT "ぬるぽ"
810 LPRINT "ガッ禁止"
0168デフォルトの名無しさん2005/03/31(木) 23:58:44
NEW ON
10 PRINT 'NULLPO ';
20 GOTO 10
RUN
0169デフォルトの名無しさん2005/04/01(金) 00:03:36
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
0170デフォルトの名無しさん2005/04/01(金) 00:06:01
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO NULLPO
0171デフォルトの名無しさん2005/04/07(木) 12:06:31
NEW
100 PRINT ">>169-170 ガッ"
110 GOTO "100"
0172デフォルトの名無しさん2005/04/07(木) 19:09:00
トントカイモ
0173デフォルトの名無しさん2005/07/17(日) 00:35:02
>DIR

N88BASIC.EXE

0174BASIC2005/11/23(水) 20:29:02
キーボードより入力したデータの中で最大値と最小値を求める
プログラムを作成しなさい。0を入力した場合に終了
0175デフォルトの名無しさん2005/11/24(木) 13:36:29
>>174
10 MAX=0
20 MIN=1000000
30 INPUT N
40 IF N = 0 THEN GOTO 80
50 IF N > MAX THEN MAX = N
60 IF N < MIN THEN MIN = N
70 GOTO 30
80 PRINT MAX,MIN
90 END
0176BASIC2005/12/01(木) 16:28:30
N人分のデータ(氏名、体重、身長、年齢)がDATA文で入力されているプログラムが
ある。これを用いて次のプログラムをBASICで作成しなさい
1、最も体重の軽い人の名前を表示する
2、身長が160CM以上で170cm未満の人の名前を表示する
3、体重が60kg以上で、身長が150cm未満の人の名前を表示する
4、年齢が30歳以下の人の、体重と身長の平均値を計算し表示する

0177BASIC2005/12/14(水) 15:51:43
次のプログラムをBASICで作成しなさい

データを1件ずつ、ユーザ定義関数を利用して
「公共料金」を計算させることにします
<電気料金の計算>
基本料金:1800円 定量制料金単価は
・使用量が90Kwh以下であれば18.14円/Kwh
・ 〃 90Kwh超230Kwh以下であれば24.85円/Kwh
・ 〃 230Kwh超であれば27.21円/Kwh
(料金計算例)
70Kwh使用した場合:1800+70×18.14
120Kwh使用した場合:1800+90×18.14+(120−90)×24.85
=3432.6+(120−90)×24.85
250Kwh使用した場合:1800+90×18.14+140×24.85+(250−230)×27.21
=6911.6+(250−230)×27.21
0178デフォルトの名無しさん2005/12/14(水) 20:40:51
178 GOTO 178
0179デフォルトの名無しさん2005/12/16(金) 02:30:03
>176
どのBASICを使うかでかなり難易度が違ってくる訳だが。

モノによってはソート関数実装してたりする品。
0180デフォルトの名無しさん2005/12/18(日) 16:22:09
エラー処理ってあったら
エラーが起きても復帰できるんだが
====ひまわり====
えらーに エラー処理設定
『dscsdeqdaqw:dwedewewd\』を 読む
復帰したーと 言う
おわり
待機
母艦浮上
*えらー
『エラー』と 言う
エラー復帰
===ひまわり===============
0181デフォルトの名無しさん2005/12/18(日) 16:25:54
811 PASS "2chバンザーイ"
0182デフォルトの名無しさん2005/12/18(日) 17:23:59
10 SAY "カンジ カンジ"
20 SAY "テツヤ テツヤ"
30 GOTO 10
0183デフォルトの名無しさん2005/12/18(日) 17:58:35
812 goto 1
0184デフォルトの名無しさん2006/01/29(日) 20:22:08
問1:「あたかも」を使ってプログラムをBASICを作りなさい。
0185デフォルトの名無しさん2006/01/30(月) 17:13:35
820 A$="あたかも"
0186デフォルトの名無しさん2006/01/30(月) 19:26:01
830 PRINT "冷蔵庫に牛乳が";A$;"しれない"
0187デフォルトの名無しさん2006/01/30(月) 20:01:04
840 LIST 1-
850 GOTO 840
0188デフォルトの名無しさん2006/02/03(金) 08:37:13
10 SCREEN 2,2,0,1
0189デフォルトの名無しさん2006/02/22(水) 21:40:37
goto 1
0190デフォルトの名無しさん2006/03/08(水) 11:24:12
Out of memory
0191デフォルトの名無しさん2006/03/16(木) 13:47:45
860 REM 問2:「うってかわった」を使ってBASICでプログラムを作りなさい。
0192デフォルトの名無しさん2006/03/16(木) 22:06:21
870 GOTO 861
0193http://www.vector.co.jp/soft/win95/util/se072729.html2006/03/18(土) 19:45:32
TextSS のWindowsXP(Professional)64bit化おながいします

もしくは64bitにネイティブ対応したテキスト置換ソフトありますか?
0194デフォルトの名無しさん2006/04/15(土) 02:13:49
wait 65535
0195デフォルトの名無しさん2006/04/15(土) 07:07:53
880 A$="うってかわった"
881 PRINT "彼は麻薬を";A$
0196デフォルトの名無しさん2006/04/17(月) 12:46:17
890 GOTO 910
0197デフォルトの名無しさん2006/04/18(火) 01:41:15
895 REM  ァ  ∧,,_,,∧ ァ,、
900 REM ,、'` ( ´∀`) ,、'`
905 REM  '`  ( ⊃ ⊂)  '`
0198デフォルトの名無しさん2006/06/11(日) 23:13:34
SAVE
0199デフォルトの名無しさん2006/06/15(木) 09:39:08
POKE &H07,&HB7
0200デフォルトの名無しさん2006/06/16(金) 17:33:16
10 FOR I = 1 TO 65535
20 POKE 0, I
30 NEXT I
0201デフォルトの名無しさん2006/06/17(土) 21:50:47
910 PRINT "ぬるぽ"
0202デフォルトの名無しさん2006/10/29(日) 18:45:51
>>201ガッ
>>203ガッ
0203デフォルトの名無しさん2006/10/29(日) 19:39:21
ぬるり
0204デフォルトの名無しさん2006/10/30(月) 00:19:57
10000 goto 10000
■ このスレッドは過去ログ倉庫に格納されています