pelo7777のブログ

pelo7777のブログ

PR

キーワードサーチ

▼キーワード検索

プロフィール

pelo7777

pelo7777

カレンダー

コメント新着

コメントに書き込みはありません。

フリーページ

2015.12.29
XML
カテゴリ: Microsoft Small Basic

変数を使ってみます。

--- Sample Program 1 ---

TextWindow.Write("名前はなあに : ")
name = TextWindow.Read()TextWindow.WriteLine("名前は " + name + "ですね。")
TextWindow.WriteLine("初めまして。")

var

--- Sample Program 2 ---

number1 = 10
number2 = 20number3 = number1 + number2
TextWindow.WriteLine(number3)

var2

--- Sample Program 3 ---

TextWindow.Write("華氏を入力して: ")
fahr = TextWindow.ReadNumber()
celsius = 5 * (fahr - 32) / 9
TextWindow.WriteLine("摂氏 " + celsius + "です。")

https://ja.wikipedia.org/wiki/セルシウス度
https://ja.wikipedia.org/wiki/華氏

var3

--- Sample Program 4 ---

IF文を使ってみます。

「If ... Then ... EndIf」の例。

If (Clock.Hour < 12) Then
TextWindow.WriteLine("おはよう!")
EndIf
If (Clock.Hour >= 12) Then
TextWindow.WriteLine("こんにちは!")
EndIf

「Clock.Hour」は時刻を戻します。

var4

--- Sample Program 5 ---

「If ... Then ... Else ... EndIf」の例。

If (Clock.Hour < 12) Then
TextWindow.Write("おはよう!")
TextWindow.WriteLine("朝食はどうする?")
Else
TextWindow.Write("こんにちは!")
TextWindow.WriteLine("調子はどう?")
EndIf

var5

--- Sample Program 6 ---

TextWindow.Write("数値を入力して: ")
num = TextWindow.ReadNumber()
remainder = Math.Remainder(num, 2)
If (remainder = 0) Then
TextWindow.WriteLine("偶数です。")
Else
TextWindow.WriteLine("奇数です。")
EndIf

「Math.Remainder」は、最初の値を 2 番目の値で割った余りを返します。

var6

--- Sample Program 7 ---

ラベルとGoto文を使ってみます。

i = 1
start:
TextWindow.WriteLine(i)
i = i + 1
If (i < 10) Then
Goto start
EndIf

「start:」はラベル。「Goto start」でここにジャンプする。

var7


【楽天ブックスならいつでも送料無料】フリーランスのジタバタな舞台裏 [ きたみりゅうじ ] 楽天ブックス


【楽天ブックスならいつでも送料無料】新卒はツラいよ! [ きたみりゅうじ ] 楽天ブックス


【楽天ブックスならいつでも送料無料】SEのフシギな職場 [ きたみりゅうじ ] 楽天ブックス






お気に入りの記事を「いいね!」で応援しよう

最終更新日  2015.12.29 20:25:12
コメント(0) | コメントを書く


【毎日開催】
15記事にいいね!で1ポイント
10秒滞在
いいね! -- / --
おめでとうございます!
ミッションを達成しました。
※「ポイントを獲得する」ボタンを押すと広告が表示されます。
x
X

© Rakuten Group, Inc.
X
Mobilize your Site
スマートフォン版を閲覧 | PC版を閲覧
Share by: