このディレクトリの索引

# 出典 :: C/C++の宿題片付けます 158代目 #592 # [1] 授業単元:C # [2] 問題文: # 物体を投げ上げるときの運動方程式は、横方向(x方向)は、x方向の初速度vx=10m/sとすると、x=vx*t # 縦方向(y方向)は、重力加速度をg=9.8m/s^2、y方向の初速度をvy=10m/sとすると、y=-1/2*g*t^2+vy*tで与えられる。ここでtは時間である。 # 時間を0.2秒刻みで3秒間のx,yの値についてscanf関数(vx,vyを読み込み)を計算するプログラムを作成せよ。 # '物体を投げ上げるときの運動方程式は、横方向(x方向)は、x方向の初速度vx=10m/sとすると、x=vx*t 縦方向(y方向)は、重力加速度をg=9.8m/s^2、y方向の初速度をvy=10m/sとすると、y=-1/2*g*t^2+vy*tで与えられる。ここでtは時間である。vx,vyを読み込み、時間を0.2秒刻みで3秒間のx,yの値を計算する'(_x_yの値ならび) :- 'vx,vyを読み込み'(_vx,_vy), '時間を0.2秒刻みで3秒間のx,yの値を計算する'(_vx,_vy,_x_yの値ならび). '時間を0.2秒刻みで3秒間のx,yの値を計算する'(_vx,_vy,_x_yの値ならび) :- findall([_x,_y],( '時間を0.2秒刻みで3秒間のx,yの値'(_vx,_vy,_x,_y)),_x_yの値ならび). '時間を0.2秒刻みで3秒間のx,yの値'(_vx,_vy,_x,_y) :- '時間を0.2秒刻みで3秒間の'(_t), 'x,yの値'(_vx,_vy,_t,_x,_y). '時間を0.2秒刻みで3秒間の'(_t) :- between(0,15,T), _t is T / 5. 'x,yの値'(_vx,_vy,_t,_x,_y) :- _x is _vx * _t, _y is -1 / 2 * 9.8 * _t^2 + _vy * _t. 'vx,vyを読み込み'(_vx,_vy) :- 数を得る('x方向の初速度(m/s)',_vx), 数を得る('y方向の初速度(m/s)',_vy). 数を得る(_催促表示,_数) :- 催促表示(_催促表示), readln([_数]). 催促表示(_催促表示) :- writef('%w ',[_催促表示]).