本日の内容
例題１．プログラム実行の体験
2
オンライン開発環境 Online GDB
•プログラミングを行えるオンラインのサービス
https://www.onlinegdb.com
•ウェブブラウザを使う
•たくさんの言語を扱うことができる
Pascal, Python3, Java, C/C++, C#, JavaScript,
R, アセンブリ言語，SQL など
•オンラインなので、「秘密にしたいプログラム」
を扱うには十分な注意が必要 3
Online GDB でPascal を動かす手順
① ウェブブラウザを起動する
②次の URL を開く
https://www.onlinegdb.com
4
③「Language」のところで，「Pascal」を選ぶ
5
エディタ画面
実行ボタン
プログラムを
書き換えること
ができる
6
例題１．プログラム実行の体験
•コンピュータを役に立つ道具として実感するため
に，次ページのプログラムを使って，sin 関数の
繰り返し計算を行ってみる
7
program sum;
var start_x, step_x, x, y:real;
var i:integer;
begin
write('Please Enter start_x:');
readln(start_x);
write('Please Enter step_x:');
readln(step_x);
for i:=1 to 20 do
begin
x := start_x + ( i * step_x );
y := sin(x);
writeln('sin(', x:8:3, ') =', y:8:3);
end;
readln
end. 8
計算の繰り返しを
行っている部分
キーボードからの
データの読み込みを
行っている部分
画面へのデータの
書き出しを行ってい
る部分
例題１のプログラム実行結果
9
キーボードから，デー
タ「0.4」と「0.1」を
読み込んでいる
計算を 20回繰り返して，
計算結果を表示してい
る
プログラムの機能
プログラムでは，計算等の実行手順を記述
•計算の繰り返し
計算は自動で繰り返し
•キーボードからの読み込み
•画面への表示
など
10
例題１のプログラムの機能
１．キーボードからのデータの読み込み
次の２つの値を読み込む
start_x, step_x
２．計算の繰り返し
sin( x ) の計算を２０回繰り返す
x = start_x + step_x,
start_x + 2 ×step_x,
...
start_x + 20 ×step_x
３．画面へのデータの書き出し
計算した sin( x ) の値を書き出す
11
２０回分
実行(1/4)
12
「Run」をクリック
実行(2/4)
13
実行画面が現れる
実行(3/4)
14
数値を入れる
（プログラムに数値
データを与える）
実行(4/4)
15
さらに数値を入れると，
計算結果が表示される
実行の終了
16
「Stop」をクリック
演習１
例題１ のプログラムを実行して，sin(0.4) の値を確
認しなさい
そのために start_x, step_x の値を適切に与えるこ
と
17
演習２
例題１のプログラムの「sin」の部分を，わざと間
違えて（「son」のように），コンピュータによる
プログラムの構文チェックの機能が有効に働いてい
ることを確認しなさい
18
演習３
例題１のプログラムを cos の値を計算できるよう
に書き換えて，実行をしなさい．そして，cos(0.4)
の値を確認しなさい．
y := cos(x);
19
