Lunatilia: 業務日誌

部外者が隣に居るのに

Mon, 23 Jun 2008 08:22:36 GMT

普通にパスワードを口にするとか信じられないよ・・・

マナー

Fri, 11 Apr 2008 05:15:53 GMT

大学生なのに、公共の場の使い方・マナーぐらい守れないのかと。
イスの出しっぱなしとか、公共物を持って帰ったりとか、挙句の果てにはゴミを放置して出て行くとか、それでも大学生か。

とまぁ、休憩中に見た光景の愚痴。

12月18日(火) 課題一覧

Tue, 18 Dec 2007 15:00:29 GMT

本日の情報処理の授業で課題として出題されたプログラムのサンプル。
いつもどおり見難いと思いますが、課題提出程度であればこれでも多分OK。
FORTRAN77 なはずなのに Fortran90 の DO～END DO が含まれているのは授業の都合上の仕様です。
文番号 + CONTINUE なんてやると思考回路が停止してしまう生徒が多発したので、DO～END DO　に統一してみたところ、普通に思考回路が停止する子がいなくなったという経緯ががが。

課題1
S = 1 + 1 / 2! + 1 / 3! + . . . + 1 / 10! を求めるプログラムを書きなさい。

課題1 サンプルソース

C------------------------------------------------------------------------------
C p1218n1.for
C------------------------------------------------------------------------------
C 課題1
C S = 1 + 1 / 2! + 1 / 3! + . . . + 1 / 10! を求めるプログラムを書きなさい。
C------------------------------------------------------------------------------

C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-E

      IMPLICIT NONE
      
      INTEGER I, J, N
      REAL    S
      
C  *  N, J, S の初期化  *
      N = 10
      J =  1
      S =  0.
      
C  *  計算  *
      DO I = 1, N
          
          J = J * I
          S = S + 1.0 / REAL(J)
          
C        *  確認用なので必要なければ書かなくてもOK  *
          WRITE(6,200) I, J, S
          
      END DO
      
C  *  計算結果の出力  *
      WRITE(6,*)
      WRITE(6,100) S
      
C  *  FORMAT 文  200番の文は27行目を書いていない場合は必要なし  *
  100 FORMAT( 'S = ', F10.6 )
  200 FORMAT( I2,'! = ', I9, '    S = ', F10.6 )
      
      STOP
      END

==== p1218n1.for 実行結果 ====
 1! =         1    S =   1.000000
 2! =         2    S =   1.500000
 3! =         6    S =   1.666667
 4! =        24    S =   1.708333
 5! =       120    S =   1.716667
 6! =       720    S =   1.718055
 7! =      5040    S =   1.718254
 8! =     40320    S =   1.718279
 9! =    362880    S =   1.718281
10! =   3628800    S =   1.718282

S =   1.718282

課題2
S = 1 - 1 / 2! + 1 / 3! - . . . - 1 / 10! を求めるプログラムを書きなさい。

課題2 サンプルソース

C------------------------------------------------------------------------------
C p1218n2.for
C------------------------------------------------------------------------------
C 課題2
C S = 1 - 1 / 2! + 1 / 3! - . . . - 1 / 10! を求めるプログラムを書きなさい。
C------------------------------------------------------------------------------

C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-E

      IMPLICIT NONE
      
      INTEGER I, J, N
      REAL    S
      
C  *  N, J, S の初期化  *
      N = 10
      J =  1
      S =  0.
      
C  *  計算  *
      DO I = 1, N
          
          J = J * I
          S = S + 1.0 / REAL(J)
          
C        *  確認用なので必要なければ書かなくてOK  *
          WRITE(6,200) I, J, S
          
C        *  符号反転  *
          J = -J
          
      END DO
      
C  *  計算結果の出力  *
      WRITE(6,*)
      WRITE(6,100) S
      
C  *  FORMAT 文  200番は27行目を書いていない場合は必要なし  *
  100 FORMAT( 'S = ', F10.6 )
  200 FORMAT( i2,'! = ', i9, '    S = ', F10.6 )
      
      STOP
      END

==== p1218n2.for 実行結果 ====
 1! =         1    S =   1.000000
 2! =        -2    S =   0.500000
 3! =         6    S =   0.666667
 4! =       -24    S =   0.625000
 5! =       120    S =   0.633333
 6! =      -720    S =   0.631944
 7! =      5040    S =   0.632143
 8! =    -40320    S =   0.632118
 9! =    362880    S =   0.632121
10! =  -3628800    S =   0.632120

S =   0.632120

課題3
3人分の4科目の点数を読み込み、その点数と各個人の平均、各教科の平均を出力するプログラムを書きなさい。
ただし、点数の格納には2次元配列を使うこと。

課題3 サンプルソース

C------------------------------------------------------------------------------
C p1218n3.for
C------------------------------------------------------------------------------
C 課題3
C 3人分の4科目の点数を読み込み、その点数と各個人の平均、各教科の平均を出力する
C プログラムを書きなさい。
C ただし、点数の格納には2次元配列を使うこと。
C------------------------------------------------------------------------------

C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-E

      IMPLICIT NONE
      
      INTEGER A(3,4), I, J, S
      REAL    X_AVE(3), Y_AVE(4)
      
C  *  点数の読み込み  *
      DO I = 1, 3
          WRITE(6,10) I
          READ(5,*) ( A(I,J), J = 1, 4 )
          
      END DO
      
C  *  個人の平均を計算  *
      DO I = 1, 3
          
          S = 0
          
          DO J = 1, 4
              
              S = S + A(I,J)
              
          END DO
          
          X_AVE(I) = S / 4.0
          
      END DO
      
C  *  読み込んだ点数と個人の平均を出力  *
      WRITE(6,*) '            国語     数学     英語     社会    平均値'
      DO I = 1, 3
          
          WRITE(6,100) I, ( A(I,J), J = 1, 4 ), X_AVE(I)
          
      END DO
      
C  *  各教科の平均を計算  *
      DO J = 1, 4
          
          S = 0
          
          DO I = 1, 3
              
              S = S + A(I,J)
              
          END DO
          
          Y_AVE(J) = S / 3.0
          
      END DO
      
C  *  各教科の平均を出力  *
      WRITE(6,200) ( Y_AVE(I), I = 1, 4 )
      
C  *  FORMAT 文  *
   10 FORMAT( I2,'人目の点数を入力 (国 数 英 社)' )
  100 FORMAT( I2,'人目 ', 4I9, F10.1 )
  200 FORMAT( '教科平均', 4F9.1 )
      
      STOP
      END

==== p1218n3.for 実行結果 ====
 1人目の点数を入力 (国 数 英 社)
90 85 87 78
 2人目の点数を入力 (国 数 英 社)
81 54 68 93
 3人目の点数を入力 (国 数 英 社)
71 85 84 88
             国語     数学     英語     社会    平均値
 1人目        90       85       87       78      85.0
 2人目        81       54       68       93      74.0
 3人目        71       85       84       88      82.0
教科平均     80.7     74.7     79.7     86.3

課題4
3行4列の行列の足し算を行うプログラムを書きなさい。
データの格納には2次元配列を使用すること。

課題4 サンプルソース

C------------------------------------------------------------------------------
C p1218n4.for
C------------------------------------------------------------------------------
C 課題3
C 3行4列の行列の足し算を行うプログラムを書きなさい。
C データの格納には2次元配列を使用すること。
C------------------------------------------------------------------------------

C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-E

      IMPLICIT NONE
      
      INTEGER I, J, A(3,4), B(3,4), ADD(3,4)
      
C  *  行列 A の入力  *
      WRITE(*,*) 'A行列の入力'
      DO I = 1, 3
          
          READ(5,*) ( A(I,J), J = 1, 4 )
          
      END DO
      
C  *  行列 B の入力  *
      WRITE(6,*) 'B行列の入力'
      DO I = 1, 3
          
          READ(5,*) ( B(I,J), J = 1, 4 )
          
      END DO
      
C  *  行列の足し算  *
      DO I = 1, 3
          
          DO J = 1, 4
              
               ADD(I,J) = A(I,J) + B(I,J)
              
          END DO
          
      END DO
      
C  *  計算結果出力  *
      WRITE(6,*) 'A 行列と B 行列の和'
      DO I = 1, 3
          
          WRITE(6,10) ( ADD(I,J), J = 1, 4 )
          
      END DO
      
      
C  *  FORMAT 文  *
   10 FORMAT( 4I7 )
      
      STOP
      END

==== p1218n4.for 出力結果 ====
 A行列の入力
    1    2    3    4
   10   20   30   40
  100  200  300  400
 B行列の入力
   -1   -2   -3   -4
  -10  -20  -30  -40
 -100 -200 -300 -400
 A 行列と B 行列の和
      0      0      0      0
      0      0      0      0
      0      0      0      0

特別課題エラトステネスの篩
2 から N 間での素数を確定しその個数を数えるプログラムを書け。
できれば素数と確定した数を表示するのが望ましい。

C------------------------------------------------------------------------------
C numprmbs.for | エラトステネスの篩
C------------------------------------------------------------------------------
C 2 から N 間での素数を確定しその個数を数えるプログラムを作成しなさい。
C 2重 DO LOOP の使用
C------------------------------------------------------------------------------

C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-E

      IMPLICIT NONE
      
      INTEGER J, K, N, NP, P(32000), H(16000), C
      
C  *  カウンター初期化  *
      NP = 0
      C  = 0
      
C  *  入力部  32000以上が入力された場合は終了  *
      WRITE(*,*) 'INPUT INTEGER N < 32000'
      READ(*,*) N
      IF( N .GE. 32000 ) STOP
      
C  *  素数の候補に 1 を代入  *
      DO K = 2, N
          
          P(K) = 1
          
      END DO
      
C  *  J の倍数には 0 を代入  *
      DO J = 2, N
          
          DO K = 2 * J, N, J
              
              P(K) = 0
              
          END DO
          
      END DO
      
C  *  K が素数だと P(K) = 1  *
C  *  2 から N までの素数の個数 NP を求めて書き出す  *
      DO K = 2, N
          
          IF( P(K) .EQ. 1 ) NP = NP + 1
          
      END DO
      
C  *  H 配列に素数 K を代入  *
      DO K = 2, N
           
           IF( P(K) .EQ. 1 ) THEN
               
               C = C + 1
               H(C) = K
               
           END IF
      
      END DO
      
C  *  出力  *
      WRITE(6,200) ( H(K), K = 1, NP )
      WRITE(*,*)
      WRITE(6,100) NP
      
C  *  FORMAT 文  *
  100 FORMAT( '個数 : ', I5, '個' )
  200 FORMAT( 10I7 )
      
      STOP
      END

==== numprmbs.for 実行結果 ====
 INPUT INTEGER N < 32000
1000
      2      3      5      7     11     13     17     19     23     29
     31     37     41     43     47     53     59     61     67     71
     73     79     83     89     97    101    103    107    109    113
    127    131    137    139    149    151    157    163    167    173
    179    181    191    193    197    199    211    223    227    229
    233    239    241    251    257    263    269    271    277    281
    283    293    307    311    313    317    331    337    347    349
    353    359    367    373    379    383    389    397    401    409
    419    421    431    433    439    443    449    457    461    463
    467    479    487    491    499    503    509    521    523    541
    547    557    563    569    571    577    587    593    599    601
    607    613    617    619    631    641    643    647    653    659
    661    673    677    683    691    701    709    719    727    733
    739    743    751    757    761    769    773    787    797    809
    811    821    823    827    829    839    853    857    859    863
    877    881    883    887    907    911    919    929    937    941
    947    953    967    971    977    983    991    997

個数 :   168個

fgets()関数

Mon, 17 Dec 2007 06:02:47 GMT

scanfの代わりに

fgets( str, sizeof( str ), stdin ); /* str: char str[ N ] */

を教えるのもありか。
案外 amaki が担当している授業の先生よりいいかも。
文字列に関してはあの人よりまだ安心感がある。

文字コード表

Mon, 17 Dec 2007 06:00:23 GMT

この授業においては文字列をやらないほうがいいような気がするけど、例で出されていたコード表を作成させるっていうのはありかなと。

サンプルコード :

/******************************************************************************
 * character_code.c | コード表(NUL, BEL, BS, HT, LF, VT, FF,CR, SO, SI 除く)
 *****************************************************************************/

#define  MAX   255
#define    N    32

#include <stdio.h>

int main( void )
{
	int i, j;
	
	for( i = 0; i < MAX; i += N )
	{
		printf( "%4d-%4d: ", i, i + N - 1 );
		
		for( j = 0; j < N; j++ )
		{
			/* 0, 7-15 は除く */
			if( i + j == 0 || i + j > 6 && i + j < 16 )
			{
				printf( "  " );
			}
			else
			{
				printf( " %c", i + j );
			}
		}
		
		printf( "\n" );
	}
	return 0;
}

実行結果 :

ソート

Fri, 14 Dec 2007 08:00:00 GMT

久々にちゃんと考えながら授業を受けている人でも少し時間がかかると思われる問題が出ました。
さすがはI講師、あの人の授業はちゃんと聞いていれば安心して授業を受けれますし、こちらとしても安心して補助できます。
まぁ聞いてればの話ですが…
というか数年ぶりにCHARACTER型とか、複数のデータのソーティングが問題に入った気がする。
でも別に彼らが今までと比べて特別優秀だから次に進めるっていうわけでもないので、ある意味賭けかもしれないｗ
というかね、寝てる人が多くて、最悪なのは涎が机に溜まってた人がいる…

問題：
最大50人までの名前、身長、体重をリダイレクトで読み込み、身長をキーにして並べ替えを行うプログラムをつくりなさい。

とりあえず私の書いたクソなサンプルで我慢して・・・

サンプルコード

C------------------------------------------------------------------------------
C sort.for | ソート
C------------------------------------------------------------------------------]
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-E
      IMPLICIT NONE
      
      CHARACTER*10   DTN(50), TMPC
      INTEGER        I, J, K, N, NMAX
      REAL           DTH(50), DTW(50), TMPH, TMPW
      
C  *  データの入力  *
      N = 0
      
      DO I = 1, 50
      
          READ(5,200,END = 10) DTN(I), DTH(I), DTW(I)
          N = N + 1
          
      END DO
      
   10 CONTINUE
      
C  *  データの出力  *
      WRITE(*,*) '---------------------------------------'
      WRITE(*,*) '      名 前       身長    体重'
      WRITE(*,*) '---------------------------------------'
      
      DO I = 1, N
      
          WRITE(6,300) DTN(I), DTH(I), DTW(I)
          
      END DO
      
      WRITE(6,*) '---------------------------------------'
      WRITE(6,*) 
      
      WRITE(6,*) '身長をキーにして並べ替えします。'
      
C  *  並び替え  *
      DO J = 1, N - 1
          
          NMAX = J
          DO K = J + 1, N
              
              IF(DTH(K) .LT. DTH(NMAX)) NMAX = K
              
          END DO
          
C      *  名前の並べ替え  *
          TMPC      = DTN(NMAX)
          DTN(NMAX) = DTN(J)
          DTN(J)    = TMPC
          
C      *  身長の並べ替え  *
          TMPH      = DTH(NMAX)
          DTH(NMAX) = DTH(J)
          DTH(J)    = TMPH
          
C      *  体重の並べ替え  *
          TMPW      = DTW(NMAX)
          DTW(NMAX) = DTW(J)
          DTW(J)    = TMPW
          
      END DO
      
C  *  並び替え後のデータの出力  *
      WRITE(*,*) '---------------------------------------'
      WRITE(*,*) '      名 前       身長    体重'
      WRITE(*,*) '---------------------------------------'
      
      DO I = 1, N
          
          WRITE(6,300) DTN(I), DTH(I), DTW(I)
          
      END DO
      
      WRITE(6,*) '---------------------------------------'
      
C  *  FORMAT文  *
  200 FORMAT(A10, F10.1, F10.1)
  300 FORMAT(4X, A10, F8.1, F8.1)
      
      STOP
      END

以下は実行データのサンプル(data26.txtというファイルに格納)

AAAA AAA       172.5      70.5
BBBB BBB       153.0      62.0
CCCC CCC       160.5      75.5
DDDD DDD       170.5      80.5
EEEE EEE       168.5      66.5
FFFF FFF       165.0      58.0
GGGG GGG       173.0      60.5
HHHH HHH       145.5      48.5
IIII III       159.5      70.5
JJJJ JJJ       167.0      52.5
KKKK KKK       170.5      72.0
LLLL LLL       158.5      52.0
MMMM MMM       171.5      65.5
NNNN NNN       160.0      57.5
OOOO OOO       166.5      60.5
PPPP PPP       174.5      70.0
QQQQ QQQ       155.5      52.0
RRRR RRR       161.0      65.5
SSSS SSS       164.5      64.5
TTTT TTT       168.5      57.5
UUUU UUU       158.5      55.5
VVVV VVV       160.5      59.5
WWWW WWW       168.0      68.5
XXXX XXX       170.5      65.0
YYYY YYY       161.5      67.5
ZZZZ ZZZ       163.5      52.0

実行結果

---------------------------------------
      名 前       身長    体重
---------------------------------------
   AAAA AAA     172.5    70.5
   BBBB BBB     153.0    62.0
   CCCC CCC     160.5    75.5
   DDDD DDD     170.5    80.5
   EEEE EEE     168.5    66.5
   FFFF FFF     165.0    58.0
   GGGG GGG     173.0    60.5
   HHHH HHH     145.5    48.5
   IIII III     159.5    70.5
   JJJJ JJJ     167.0    52.5
   KKKK KKK     170.5    72.0
   LLLL LLL     158.5    52.0
   MMMM MMM     171.5    65.5
   NNNN NNN     160.0    57.5
   OOOO OOO     166.5    60.5
   PPPP PPP     174.5    70.0
   QQQQ QQQ     155.5    52.0
   RRRR RRR     161.0    65.5
   SSSS SSS     164.5    64.5
   TTTT TTT     168.5    57.5
   UUUU UUU     158.5    55.5
   VVVV VVV     160.5    59.5
   WWWW WWW     168.0    68.5
   XXXX XXX     170.5    65.0
   YYYY YYY     161.5    67.5
   ZZZZ ZZZ     163.5    52.0
---------------------------------------

身長をキーにして並べ替えします。
---------------------------------------
      名 前       身長    体重
---------------------------------------
   HHHH HHH     145.5    48.5
   BBBB BBB     153.0    62.0
   QQQQ QQQ     155.5    52.0
   LLLL LLL     158.5    52.0
   UUUU UUU     158.5    55.5
   IIII III     159.5    70.5
   NNNN NNN     160.0    57.5
   CCCC CCC     160.5    75.5
   VVVV VVV     160.5    59.5
   RRRR RRR     161.0    65.5
   YYYY YYY     161.5    67.5
   ZZZZ ZZZ     163.5    52.0
   SSSS SSS     164.5    64.5
   FFFF FFF     165.0    58.0
   OOOO OOO     166.5    60.5
   JJJJ JJJ     167.0    52.5
   WWWW WWW     168.0    68.5
   TTTT TTT     168.5    57.5
   EEEE EEE     168.5    66.5
   XXXX XXX     170.5    65.0
   KKKK KKK     170.5    72.0
   DDDD DDD     170.5    80.5
   MMMM MMM     171.5    65.5
   AAAA AAA     172.5    70.5
   GGGG GGG     173.0    60.5
   PPPP PPP     174.5    70.0
---------------------------------------

もし大きいほうから順に並べたければ46行目の

IF(DTH(K) .LT. DTH(NMAX)) NMAX = K

の".LT."を".GT."に変更すればいいし、体重をキーにするなら体重の比較をすればいいという。

ちなみに「午前中は同じ授業内容で2次元配列まで行けたのになぁ…午後は無理かぁ…」という先生のお言葉。
そりゃゆとり教育全盛時代の生徒たちですからね、まだまだ授業方針で悩める日が続く……。

実数値データを読み込んで、最大値、最小値およびそのデータ番号を表示するプログラム

Wed, 12 Dec 2007 08:00:16 GMT

とりあえず、今日の授業で出された課題。
授業方針により、FORTRAN77 と Fortran90 が混在していることや、FORMAT文を使っていないこと、処理方法が適切でないのは仕様です。

C------------------------------------------------------------------------------
C 1212_02.for | 2007年12月12日  課題2
C------------------------------------------------------------------------------
C 課題2
C 
C キーボードから実数値のデータを読み込み、最大値、最小値とそれらのデータ番号を
C 表示するプログラムを作りなさい。
C なお、同じ値が入力された場合の処理や、入力および出力のフォーマットは考慮しな
C くてよい。
C------------------------------------------------------------------------------

C---+----1----+----2----+
      IMPLICIT NONE
      
      INTEGER I, N, MAXBUF, MINBUF
      REAL DMAX, DMIN, DAT
      
      WRITE(*,*) '個数を入力'
      READ(*,*) N
      
C  *  N が 1 以下の場合は処理を終了する *
      IF( N .LE. 1 ) STOP
      
      WRITE(*,*) N, '個のデータを入力してください'
      READ(*,*) DAT
      
C  *  DMAX と DMIN に DAT の値を代入して仮の最大・最小値として初期化する  *
      DMAX = DAT
      DMIN = DAT
C  *  最大、最小値になったときのデータの番号を仮に 1 として初期化する  *
      MAXBUF = 1
      MINBUF = 1
      
      
      DO I = 2, N
          
          READ(*,*) DAT
          
C  *  DAT が DMAX より大きい場合、DMAX の値と MAXBUF の値を更新  *
          IF( DAT .GT. DMAX ) THEN
              
              DMAX = DAT
              MAXBUF = I
              
C  *  DAT が DMIN より小さい場合、DMIN の値と MINBUF の値を更新  *
          ELSEIF( DAT .LT. DMIN ) THEN
              
              DMIN = DAT
              MINBUF = I
              
          ENDIF
      
      ENDDO
      
      WRITE(*,*) MAXBUF, '番目の', DMAX, ' が最大値'
      WRITE(*,*) MINBUF, '番目の', DMIN, ' が最小値'
      
      STOP
      END

恐怖の月曜日番外編ネタ

Tue, 11 Dec 2007 04:00:34 GMT

ネタその1

文字列と配列

	char moji;  // 文字型の変数宣言 (1文字)
	char str[10];  // 文字型の変数宣言 (9文字)
	char add[15];  // 文字型の変数宣言 (14文字)
	moji='A';	  // 文字定数Aの入力（単引用符でかこむ)
	 str='hello';  // 文字列の入力
	 add='Taro';  // 文字列の入力
	 printf("moji=%c\n", moji);	  // 文字としての出力
	 printf("%s \n", str);  // 文字列としての出力
	 printf("%s \n", add);

ネタその2

データを読み込む場合（標準関数を使って）

	getchar(moji);  // 1文字の読み込み
	putchar(moji);  // 1文字の出力

文字列の入出力
	
	gets(str);  // 文字列の読み込み
	puts(str);  // 文字列の出力

ネタその3

main(){
	char a[50];
	int i=0;
	 printf("49字以内の文字列の入力 \n");
	 scanf("%s",a);
	 while( a[i] != 0){
		printf("a[%d]= %c\n",i,a[i]);
		i=i+1;
		  }
	 }

ちなみにこれはK講師の授業で配布されたものではなく、他の授業で別の講師が作成して実際に使われた資料に書かれていたものです。
無駄に忠実に再現してみました。
さて、どこから突っ込もうか。

csnw.h

Tue, 04 Dec 2007 15:00:04 GMT

とりあえず来期から某大学の Visual Studio 2005 Professional またはそれに付属している cl コンパイラを使う授業において、

#include <csnw.h>

というものが使えるようになる予定です。(ヘッダファイル名はまだ仮ですけど)
例の scanf() を scanf_s() に書き直さんかいワレッ！いう警告がウザいのでその警告を出さないようにする文を出来るだけ単純に済ませたいだけという、ただのやる気の無さからヘッダファイル作っただけですけどねｗ
とかいいつつ、実体は

#ifdef _MSC_VER
#define _CRT_SECURE_NO_WARNINGS
#endif

これが記述されているだけという仕様ｗｗ
本当のことを言うと実は授業に関係する違う関数なども記述してありますが、それはまぁ企業秘密ということで。
某教科書の著者に提案してみたところ、二つ返事でOKが返ってきたので急遽決定。
当該授業用のお役立ちライブラリも作成する予定なので、今よりもう少しマシな授業になるかもしれないです。（先生の質次第ってところが一番大きかったりしますけどねｗ）
全システムの変更が大変なので今年の子は残念ながらどこか別のフォルダに入れて、例えば

#include "include/csnw.h"

とするか、または

#define _CRT_SECURE_NO_WARNINGS /* #define _CRT_SECURE_NO_DEPRECATE でも可 */

と書いてもらうしかないんですけどね。
ですが少なくとも春休み中にはシステムの入れ替えが入りますので来年の子から使えるようになるはずです。
もし来年大学に入る方が居て、大学の情報処理の授業でC言語を習う場合に <csnw.h> を記述することがあれば、もしかしたら私の書いたものかもしれませんね。
ちなみにstdio.hより先にインクルードする必要があるのは仕様です。

本日の課題。

Mon, 03 Dec 2007 08:00:10 GMT

まずは1つ目。

1 から 99 までの奇数の2乗分の一の和 1/1^2 +1/3^2 +...+ 1/99^2 を求めよ。
また、無限級数の和 π^2/8 と比較せよ

#define PI 3.14159265358979323846
#define N 100
#include _CRT_SECURE_NO_DEPRECATE
#include <stdio.h>
main()
{
	int i;
	double s=0.0;
	for(i =1; i < N; i +=2) {
		s +=1.0 /i/i;
         }
	printf("s=%f\n", s);
	printf("(%f)\n", PI*PI/8.0);
}

まぁまだ余裕でわかります。

次に2つ目。

キーボードから入力された整数 n (n>1)が素数かどうか判断するプログラムを作れ。
ただし、n > 1 でない時には終了するものとする。素数でない時にはその最小約数を表示するものとする。(1234567 は素数か？)
(ヒント) k=2 から始めて n%k が　0 となるまで、k を増やしていく。

#define _CRT_SECURE_NO_DEPRECATE
#include <stdio.h>
main()
{
	int n, k;
	printf("n(n>1)=");
	scanf("%d",&n);
	if(n <= 1) return;
	for(k=2; k<= n; ++k){
		if(n%k == 0) break;
	}
	if(k == n) 
		printf("%dは素数です。 \n", n);
	else
		printf("%d は素数ではなく、%d が最小約数 \n",n, k);
}

これもまぁわかります。

次に3つ目。

面積 S [m^2] の正方形の一辺 a を平方根関数 sqrt() を用いずに、逐次近似によって求めるプログラムを作れ。(x^2-S=0 を Newton 法で求めるのと同等)
(ヒント) 第1近似 a_1 を適当に決める。漸化式 a_(n+1) = (a_n +S/a_n)/2 により次々に a_n を求める。小さなεを決めて、|a_n - S/a_n| < ε となるまで続ける。
ε=1.0e-6, S=16, a_1=2 としてみよ。

#define _CRT_SECURE_NO_DEPRECATE
#define EPS 1.0e-6
#include <stdio.h>
#include <math.h>
main()
{
	double a, a1, s;
	printf("S="); scanf("%lf",&s);
	printf("a="); scanf("%lf",&a);
	while(fabs(a-s/a) >= EPS){
		a1=a;
		a = (a1+s/a1)/2.0;
	}
	printf("a= %f\n", a);
	printf("sqrt(s)= %f \n", sqrt(s));
}

ソースを見れば何がしたいかはわかりますが、説明なしにfabs()を使用…orz
同じ処理は一列にポリシーは健在。
sqrtを「スクアッド」と呼ぶ人なんですが、マイク越しだとたまに「スクワット」と聴こえるのは仕様です。

次に4つ目。

３つの整数を読み込み、小さい順に並べるプログラムを書け。(注：下のコードは完成形ではなく雛形)

#define  _CRT_SECURE_NO_DEPRECATE
#include <stdio.h>
#define N 3   // データ個数の最大値
main()
{
	int i, imin, a[N], aa;
/* データの読み込み */


/* １番小さいものを a[0] とする。元の a[0] は避難する。 */
          i =0;
          imin =0;
          if(a[i+1] < a[imin]) imin =i+1;
          if(a[i+2] < a[imin]) imin = i +2;
          if(imin > i) {
		       aa =a[i]; a[i]=a[imin]; a[imin] =aa;
		  }

/* ２番小さいものを a[1] とする。元の a[1] は避難する。 */
		  i=1;
		  imin =1;
		  if(a[i+1] < a[imin]) imin = i+1;
		  if(imin > i) {
		       aa =a[i]; a[i]=a[imin]; a[imin] =aa;
		  }

/* 表示 */

}

はい、合ってはいるけど見難いコード発生…
考え方を示しながらやりますとか言って、なんの考えもなしにやるからこんなことに。
しかもコード書いてるとき、「あれ、これは…なんだっけかなぁ。えーと、あーこれ違う。えー…あれ？わからん。いや、これか。フッフッフッ…」とか言いながらやってたら確実に不審だから…
しかも「整数天国」とか意味不明な単語を吐いちゃいましたよ、この人。

switch文によるメニュー

Wed, 28 Nov 2007 13:30:39 GMT

"恐怖の月曜日 2007-11-26 Vol.1" で触れたソースについて。
K講師の意図していた挙動を出したければ次のようにすればできるんだけどねっていう。(ほとんどそのまま流用)

/* --- menu.c -----------------------------------
 メニュー選択によって、半径を入力して、
 円の面積、円周の長さ、球の体積のいずれかを表示
 するプログラム。
-------------------------------------------------*/
#define _CRT_SECURE_NO_WARNINGS
#define PI 3.14159265358979323846

#include <stdio.h>

int main( void )
{
	int m;
	double r;
	
	printf( "次の計算が出来ます\n" );
	printf( " 1... 円の面積\n" );
	printf( " 2... 円周の長さ\n" );
	printf( " 3... 球の体積\n" );
	printf( " どれにしますか ?\n" );
	scanf( "%d", &m );
	
	if( 0 < m && m < 4 )
	{
		printf( "半径を入力してください。\n r = " );
		scanf( "%lf", &r );
	}
	
	switch( m )
	{
		case 1 :
			printf( "S = %f \n", PI * r * r );
			break;
		case 2 :
			printf( "L = %f \n", 2.0 * PI * r );
			break;
		case 3 :
			printf( "V = %f \n", 4.0 / 3.0 * PI * r * r * r );
			break;
		default :
			printf( "理解できない選択です \n" );
	}
	return 0;
}

まぁ、「あのソースコードを流用するなら」の話ですけどね。

DO文

Wed, 28 Nov 2007 08:00:30 GMT

水曜日はアシストする側としては精神的に楽なんですが、担当講師の方が現状の生徒の習熟度を考慮して方針を変えてしまい、少し変なことに…
普通、FORTRANでは反復 (DO文) を書くときは

      DO 10 K = 1, 100, 2
          複数の式
10   CONTINUE

や

      DO K = 1, 100, 2
          複数の式
      END DO

みたいな書き方をすると思いますが、本日は次のような方法を使わせていました。

C******************************************************************************
C 1128_02.for :
C******************************************************************************
C 2007/11/28 課題2
C 
C 奇数 N (N > 1) を読み込み、
C 1 + 3 + 5 + 7 + ... + N を計算するプログラムを書け。
C******************************************************************************
C---+-7--+----+----+----+
      IMPLICIT NONE
      
      INTEGER N, K, S
      
      K = 1
      S = 0
      
      WRITE(*,*) 'INPUT ODD NUMBER N'
      READ(*,*) N
      
      IF( N .LE. 1 ) STOP              ! N が 1 以下のときは終了
       IF( MOD( N, 2 ) .EQ. 0 ) STOP    ! N が偶数のときは終了（今回は書かなくてもOK）
       
       DO
          IF( K .GT. N ) EXIT
          
          S = S + K
          K = K + 2
          
      END DO
      
      WRITE(*,*) S
      
      STOP
      END

つまりDO文の制御変数を使わずに自分でカウンターを作って、かつIF文を使った条件式でループを止めてしまおうと。
この方法をとるとは思っていなかったので、数人の子にDO文の制御変数で教えちゃった…orz
ちなみに制御変数を使うと

C******************************************************************************
C 1128_02.for :
C******************************************************************************
C 2007/11/28 課題2
C 
C 奇数 N (N > 1) を読み込み、
C 1 + 3 + 5 + 7 + ... + N を計算するプログラムを書け。
C******************************************************************************
C---+-7--+----+----+----+
      IMPLICIT NONE
      
      INTEGER N, K, S
      
      S = 0
      
      WRITE(*,*) 'INPUT ODD NUMBER N'
      READ(*,*) N
      
      IF( N .LE. 1 ) STOP              ! N が 1 以下のときは終了
       IF( MOD( N, 2 ) .EQ. 0 ) STOP    ! N が偶数のときは終了（今回は書かなくてもOK）
      
       DO K = 1, N, 2
          
          S = S + K
          
      END DO
      
      WRITE(*,*) S
      
      STOP
      END

になるだけなんですけどね。
ん～、先生は上のほうに方針を変えちゃったけど、実際のところどっちがいいんだろう。
そもそも、方針を変えなきゃいけなくなってるのが問題なんですけどね。

恐怖の月曜日 2007-11-26 Vol.3

Tue, 27 Nov 2007 15:00:50 GMT

もはやここまでくると関係ないんですが、一応恐怖の月曜日シリーズ。
K講師配布資料の問題に、入力された自然数が素数かどうかを判定するというものがあります。

(032) キーボードから入力された整数 n (n>1)が素数かどうか判断するプログラムを作れ。ただし、n > 1 でない時には終了するものとする。
素数でない時にはその最小約数を表示するものとする。(1234567 は素数か？)
(ヒント) k=2 から始めて n%k が　0 となるまで、k を増やしていく。

素数じゃないときは最小約数を表示するのはいいとして、素数のときはどうしたらいいの？
「素数です」とでも表示すればいいのかなと。
とりあえず、問題で確定しているのは

整数型 n と k を定義(宣言といったほうが馴染み深い?)
n > 1 でないときはプログラムを終了する
反復文を書くときは k = 2 から始める
n % k = 0 となるときに何かをさせる

ということでしょうか。

さらにここで確認しておくこと。
この問題が出題される時点では

break 文
return 文
exit 文
continue 文
goto 文
switch 文

は説明している(はず)なので使えるようになっているはず…
とまぁ、実際そんなに上手いこといかないんですよ、これが。
K講師ってばサラッとここの部分を流しちゃったので多分理解している人が少ない…orz
まぁ、できるという前提で全然キレイなコードではないんですが、一応例を挙げておきます。

/******************************************************************************
 * prime.c : 素数判定
 ******************************************************************************
 * (032)
 * キーボードから入力された整数 n (n>1)が素数かどうか判断するプログラムを作れ。
 * ただし、n > 1 でない時には終了するものとする。素数でない時にはその最小約数を
 * 表示するものとする。(1234567 は素数か？)
 * (ヒント) k=2 から始めて n%k が　0 となるまで、k を増やしていく。
 *****************************************************************************/

#include "vcns.h"        /* scanf()警告抑制 */
#include <stdio.h>       /* printf(), gets() */
#include <stdlib.h>      /* atoi() */

int main( void )
{
	int n, k;
	char cn[11];
	
	/* 入力フェーズ : gets( cn ); は scanf( "%s", cn ); でもOK。*/
	printf( "1より大きい自然数を入力 : " );
	gets( cn );          
	n = atoi( cn );
	
	/* 1以下の数が入力されたら終了 */
	if( n < 2 )
	{
		printf( "無効な数値が入力されました。\n" );
		return 0;
	}
	
	/* k = 2 から k = n となるまで k の値を 1 ずつ増やす。
	 * もし n と k の剰余が 0 になったときに k = n だった場合は素数と判定、
	 * そうでなかった場合は最小約数を表示する。
	 */
	for( k = 2; k <= n; ++k )
	{
		if( n % k == 0 )
		{
			printf( "%d", k );
			if( n == k )
			{
				printf( "は素数です。\n" );
			}
			else
			{
				printf( "が%dの最小約数です。\n", n );
			}
			break;
		}
	}
	
	return 0;
}

まぁ授業で説明していたであろう範囲で書けばこれが無難なところなんじゃないかと。
と思いきや書いてから気づいたわけですが、atoi() とか gets() なんて教えてたっけ・・・orz
まぁ授業に沿った形に直すのであれば #include<stdlib.h> と char cn[11]; と n = atoi( cn ); を外して、gets( cn ); の部分を scanf( "%d", &n ); と置き換えればいいわけですけど。

で、この問題は 1234567 が素数かどうかを調べるということも入っていますので、実行してみますと

1より大きい自然数を入力 : 1234567
127が1234567の最小約数です。

となって、1234567は素数ではなく、最小約数が127の数であるということがわかるわけです。
ちなみに他の数を入力しますと次のような実行結果になります。

1より大きい自然数を入力 : 1
無効な数値が入力されました。
------------------------------
1より大きい自然数を入力 : 2
2は素数です。
------------------------------
1より大きい自然数を入力 : 4
2が4の最小約数です。
------------------------------
1より大きい自然数を入力 : 11
11は素数です。

恐怖の月曜日 2007-11-26 Vol.2

Mon, 26 Nov 2007 09:00:48 GMT

K講師ネタではないので、恐怖でもなんでもないんですが、微妙に絡むこと。
私が担当している情報処理のC言語クラスではVisual C++ 2005 (VC8.0) のclコンパイラを利用しているのですが、そやつを使ってコンパイルしたときに scanf() を使っているとワーニングが出ます。
scanf_s() という関数を変わりに使えと言ってくるのですが、多分 scanf_s() はMicrosoftが独自に組み込んである(scanf()に比べて)セキュアな関数なんでしょう、きっと。(/Wallオプションが入ってるからワーニングが出るのではないかと。)

けどまぁ実際には scanf() で授業を進行していますし、scanf() が入っているがためだけにいらないワーニング情報がズラーっと数行に渡って表示されますので、ワーニング情報が何かとウザいらしいです。(私はGCCを使っているので全然気にしてないんですが・・・)

そこで講師陣は毎回生徒に

#define  _CRT_SECURE_NO_DEPRECATE

というのを記述させているわけですが、コピペするにしてもなんか面倒な気がするので、

/* VC8.0 scanf() 警告抑制 */
#define  _CRT_SECURE_NO_DEPRECATE

というヘッダファイルを作成してインクルードさせたらどうだろうというチキンな考え方をし始めた今日この頃。
そうすると例えば

/* 警告抑制の記述があるヘッダをvc.hとする */
#include "vc.h"
#include <stdio.h>
#include <stdlib.h>

int collatz( int n );
int input( void );
void output( int count, int i_num );

int main( void )
{
	int n, count;
	
	n = input();
	count = collatz( n );
	output( count, n );

	return 0;
}

int input( void )
{
	int i_num;
	
	while( 1 )
	{
		printf( "Input integer number : " );
		scanf( "%d", &i_num );
		
		if( i_num <= 1 )
		{
			printf( "error!\n" );
			continue;
		}
		else
		{
			break;
		}
	}
	return i_num;
}

int collatz( int n )
{
	int count = 0;
	
	while( 1 )
	{
		printf( "%d", n );
		if( n % 2 == 0 )
		{
			n = n / 2;
		}
		else if( n == 1 )
		{
			printf( "\n" );
			break;
		}
		else
		{
			n = n * 3 + 1;
		}
		++count;
		printf( "," );
	}
	return count;
}

void output( int count, int i_num )
{
	printf( "%d times %d to 1.\n", count, i_num );
}

とすると、長ったらしいのを入れなくても警告抑制ができるじゃないかと。
無駄な入力に時間を掛けて課題ができないなんていう事態も起きてますし、こういうこともしておいたほうがいいような気がする。
または、実はこの授業用の環境ではバッチファイル化してあって、 "vc src_name.c"と入力すると自動的にコンパイルして実行するようにしてあるので、バッチファイルの中に警告抑制文を入れてしまうか。
けどそもそも、そこまでやる必要があるのかとも思ってしまうわけで。

ちなみにこのソースコードはどこぞにあったものを引っ張り出してきたやつ。
我ながらヘｔｋｓ(ry

恐怖の月曜日 2007-11-26 Vol.1

Mon, 26 Nov 2007 08:30:29 GMT

「恐怖の」というよりは「ウザい」のほうが正しいんですが、とりあえず「恐怖の」で。
某K講師が授業進行のために作成して配布しているテキストファイルに記述されていたプログラム例。

/* --- menu.c -----------------------------------
 メニュー選択によって、半径を入力して、
 円の面積、円周の長さ、球の体積のいずれかを表示
 するプログラム。
-------------------------------------------------*/
#define  _CRT_SECURE_NO_DEPRECATE
#define PI   3.14159265358979323846
#include <stdio.h>
main()
{
  int m;
  double r;
  printf("次の計算が出来ます\n");
  printf(" 1... 円の面積\n");
  printf(" 2... 円周の長さ\n");
  printf(" 3... 球の体積\n");
  printf(" どれにしますか ?\n");
  scanf("%d", &m);
  printf("半径を入力してください。\n r=");
  scanf("%lf",&r);
  switch(m){
     case 1: printf("S=%f \n",PI*r*r); break;
     case 2: printf("L=%f \n",2.0*PI*r); break;
     case 3: printf("V=%f \n",4.0/3*PI*r*r*r); break;
     default: printf("理解できない選択です \n");
  }
}

体裁云々はこの際省いておきますが、このプログラムをよーく見たら明らかにおかしい。
コンパイルは通りますし、動きもしますけどね。
このままだとコーディングした本人もおそらくは意図していない挙動が発生する…

ノートを取らない子が多いね

Wed, 21 Nov 2007 06:01:10 GMT

コンピュータを使う授業でもいろいろとメモることは多いのでノート(またはメモ用紙)は必需品だと思うのですが、今の大学生ってノートをほとんど持っていませんね。(私の在籍している大学の生徒だけかもしれませんが…)
Windows の Notepad や Word でがんばってる人もいますが、入力することに頑張りすぎて全然頭に入っていない模様。
さらに提示資料を携帯で撮影してる人が全体の 1/4 ほど。
提示資料を撮影した場合、撮影したことで安心しきってしまい、見るのを忘れて結局単位を落とすパターンが多発中。
まぁ経験上毎年数人は必ず出るんですけどね…。

まぁノートがないのは百歩譲ってOK(?)としても、教科書を買っていないというのはどうかと。
お金がないというのなら、先輩から譲り受けるなり隣の人に見せてもらうなりしてもいいような気がする。
最近のそういう生徒の口癖は「教科書ないから出来ない」。
「じゃあ買ってきたら？」と言ってみると「金が無い」と返答。
「じゃあ隣に見せてもらえば？」、と言うと隣も同じ状況。
ちなみにその子、帰り際友人と「昨日○万円下ろしたから今の俺って金持ちだぜ！」みたいなこと言ってました。
ヲィ、お金あるじゃん…
…授業受ける気あるのかなぁ。
私は講師ではないので成績云々は関わりはありませんが、その時点で単位なしとしてもいいような気がしないでもない。
売り切れ等で教科書が購入できなかったという理由ならまだ考慮のしようがあると思いますが、端から買う気が無いんならアウトにしてもいい気がする。
授業態度も悪いしね。
なんか本講師の方もそろそろプチッといきそうな感じなんですけど、どうなるんだろう。

妥協

Wed, 21 Nov 2007 06:00:31 GMT

3つの整数(n1, n2, n3 とする) をキーボードから入力するとき、その中の最大値 (nmax とする) を求めるプログラムをしたの右側に指定されているように作りなさい。変数 nmax を必ず使うこと。 (制限時間10分)

c234567 
変数の宣言

入力


n1 と n2 の大きい方を
nmax に代入





n3 が nmax より大きいときは
n3 を nmax に代入




出力



終了

これってテストにしては親切すぎやしませんかね？
問題を見て流れを考えるのも一つの訓練だと私は思うのですが。
というかこの問題、先週の課題だったので覚えてるかと思われる…
とはいうものの今年はあまりにも点数が悪い人が多いみたいなので、講師の方が妥協しちゃった形になんですけどね…
今までの教え方では通用しない今年の子。
今後の方針について、本気で悩んでおられました。
ちなみにこのテストで使用する言語は "FORTRAN77" です。

恐怖の月曜日 2007-11-19 Vol.1

Mon, 19 Nov 2007 06:00:53 GMT

問題 :
何歳ですかと聞いて、負や200以上ならば、「うそ！」と表示し、3以下あるいは100以上ならば「まさか！」と表示するプログラム。

某K講師の解答例 :

#define _CRT_SECURE_NO_DEPRECATE
#include<stdio.h>
main(){
	int a;
	printf("年齢を入力してください :");
	scanf("%d",&a);
	if((a < 0)||(a >= 200)){
		printf("うそ！\n");}
	else if((a <= 3)||(a >= 100)){
		printf("まさか！\n");}
	else{
		printf("%d歳ですね。\n",a);}
}

多分一般的な例 :

#define _CRT_SECURE_NO_DEPRECATE
#include <stdio.h>

int main( void )
{
	int a;
	
	printf( "年齢を入力してください : " );
	scanf( "%d", &a );
	
	if( a < 0 || a >= 200 )
	{
		printf( "うそ！\n" );
	}
	else if( a <= 3 || a >= 100 )
	{
		printf( "まさか！\n" );
	}
	else
	{
		printf( "%d歳ですね。\n", a );
	}
	return 0;
}

単純に見てどっちのほうが見やすいですか？

可読性の低い雛形

Mon, 12 Nov 2007 10:00:51 GMT

いつも月曜日の授業では主講師の方に対して言いたいことが山ほどあるんですが、今日の授業でK講師が教えてたコード、じーっと見るまでマヂで読めなかった…
問題としてはただ単に年齢を入力して、0未満または200を超えたなら「うそ！？」、3～99歳以外の年齢なら「まさか！？」って表示するだけなんですぐぁ。
K講師が雛形として

#define _CRT_SECURE_NO_DEPRECATE 1
#include <stdio.h>
#include <math.h>
main(void){
	int a;
	printf("年齢を入力してください : ");scanf();
	if((   ) || (   ))
	printf();
	else
}

なんて書いちゃうもんだからみんな混乱をきたして下のように書いちゃうわけですよ。

#define _CRT_SECURE_NO_DEPRECATE 1
#include <stdio.h>
#include <math.h>
main(void){
	int a;
	printf("年齢を入力してください : ");scanf("%d", &a);
	if((a<0)||(a>200))
	printf("うそ！？\n");
	else if((a<3)||(a>99))
	printf("まさか！？\n");
	else	printf("%d歳ですね。\n",a);
}

こんな単純なのになんという可読性の低さっ！
括弧が無駄に多いってば…
で、コンパイルが通ればいい方なんですが、()抜けとかでコンパイルが通らないとか多々発生するわけですよ。
しかも生徒側がちゃんと理解していないのに先に進めてしまう人なので、入力するものを間違ってたりするわけですよ。
たとえば、||をll(エル二つ)で書いたりとかさぁ…orz
ワープロとかならわかりますが、エディタの場合はモノによっては注視しなきゃいけないわけで。
しかも40人近くいるのに一人一人構ってられん…
そのくせ、そのK講師に見てもらってる子らは先生の一言

「ん～わからないなぁ…なんでだろうなぁ……よし、こういうときは全部書き直す！」

でやる気がなくなってしまうという…
なんでK講師よりもアシスタントの私のほうが教えて回ったり間違いを正したりすることになるのかさっぱりわからない…(契約上では教える立場にありません、私。あくまで補助です。)
大体終了時間になっているのに、「書き直す」とか言われたらさすがに生徒も萎えますって…
しかもなんでmath.hをインクルードしているのかが理解できん…
どう考えても(つーか考えなくても)math.h使わないだろ、このプログラム…(ちなみに一行目はVisual C++ 2005のclコンパイラのscanf()に対する警告抑制です。)
人それぞれなので書き方をとやかく言いたくはないんですが、せめて生徒側にもスタッフ側にも理解しやすくするために可読性の高い雛形を与えたほうがいいのでは？と言いたい、小一時間ほど。
ちなみに上の2つ目のコードはまだ読めます。
これより酷いのありました…orz
おかげで目が異様に痛くなったし。

情報源狭すぎな…

Sun, 04 Nov 2007 15:00:45 GMT

最近何かと問題になっていますが、学校の裏サイトに若干関係があるお話。
小学校・中学校・高等学校に限らず大学にも(おそらくはどこでも)存在していると思いますが、私の所属している大学にもそういう類の匿名掲示板が存在しています。
かなり昔から存在しているらしく、そこで先輩等が後輩に向けて損害が発生しない程度の有益な情報を流すというのが本来の目的だったようですが、まぁ例に漏れず授業や先生への悪口とか目立つ生徒の叩き合いとかが主な内容なわけですよ。

私的にはそういう場で勝手に盛り上がっている分にはどうでもいいんですが、そこに書かれている内容だけで研究室を選んできたということが今年は発生しているようで……
まぁなんつーか、「情報源狭すぎだろっ！」って一言突っ込みたくなるぐらい。
百人近くは対象者がいるはずなのに、数人しか見てないんですがね、研究室訪問に来た人。
うちの研究室に限らず、他の研究室でも同様。

私自身はそもそもその掲示板が嫌いなので内容を読んだわけではありませんが、Peacefull64が噂を聞いて見ていたので、内容等を聞いてみるとかなり現実とは違う情報が飛び交っていたようです。
先生への誹謗中傷、勝手な評価、そして研究室の良さ(何を基準にしてるかは知りませんが…)など。
先生の生徒に対する対応なんかも勝手に評価されており、この人だと就職活動が楽とか悲惨とか、この研究室に配属されるとこの系列の企業には就職できる・できない等、根拠のないデータが並んでいたそうです。（所属研究室で就職先が決まるってことはほぼありえません。）
で、その匿名掲示板に書かれている内容を信じ込んで研究室を希望してきた輩が多いので、例年とは違う現象が発生していたようです。
その掲示板を鵜呑みにして来た結果、いつもは人気の研究室の希望人数が異様に減ったということが起き、また他の研究室ではマイナス面がほとんど提示されずに天国みたいな書き方をしてあったらしく、そこは定員一杯まで来てしまったということも起きてます。
まぁ、こちらとしてはなんだかなぁ…っていう状態なわけですよ。（就職情報なんかもそういう調べ方してるんだとしたら、先が恐ろしいなぁって思いません？）

一つの情報源としてその匿名掲示板を利用するのであればまだいいんですが、そこの情報だけを真実だと鵜呑みにして採用してるあたり、多少は情報に関わる学科の生徒としてはどうかと。
各研究室に足を運んだり、先生や先輩に話を伺ってみたり、関係部署へ足を運んで聞いてみたりとするのが普通だと思いますが、訪問すらしないし、掲示板に書かれている情報だけで決めるとか、てめぇらナメすぎなと。
もしネットで調べることしかしていないということが情報通だと勘違いしているならば、それは大きな間違いですし。
ちなみに私の所属している研究室は楽に卒業できるということを書かれていたらしいですが、真実は逆です。
真面目にちゃんと毎日(とは言わないまでも出来る限り)来て、やるべきことをこなしていれば確かに楽かもしれませんが、そうでない場合はまぁ当然卒業できませんコースになるわけで。
私に懇願されてもこればっかりは研究室の長である先生が采配を下すので何の意味もないという。（大体私も教育者ではないので評価基準なんて知らないわけで…）
まぁすでに配属が決定した子は今更そういう情報を知っても仕方がないんですけどね。
今年は研究室に入ってから真実を知らされる子が当然多いので、悲惨な状況になっていそう…
少なくとも私の所属している研究室はそうでないことを祈る。

公共電力

Tue, 25 Sep 2007 05:50:08 GMT

演習室のコンセントで携帯を充電してるやつが居るわけですが、そういうのって摘発すべき？
公共電力で携帯の充電なんてするなって言いたいわけですよ。
まぁそういうのに決まって

「授業料払ってるからそれぐらいいいやろっ！」

って逆ギレするんですけどね。
ん～摘発したいなぁ。
つーか私相手なら年も大して離れていないので（たまに年上の方が居らっしゃいます）まだいいですが、先生に対してタメ口なやつはいかがなものかと。

ちなみにUSBで充電しているのは見逃します。
あくまでコンセント直挿し上等な奴らのみ。

2007/09/19 (Wed.) 3,4限

Wed, 19 Sep 2007 07:30:36 GMT

主教員 : 教材用意周到組
クラス : 某建築系学科2年A組
新入生よりも2年生のほうがやっぱり扱いにくいような気もする、無駄に大学の授業に慣れている分。

本日の授業内容

クラス分け
授業の説明 (何をするだとか、試験は何回するだとか、点数配分だったりとか、評価方法だったりとか)
電源ON！ <- (知らない子もいるので何気に重要です。
ログイン <- (初回授業はパスワード忘れや学生証不携帯なんかで必ず時間がかかるわけで。
利用するソフトウェアの簡単な説明
タイピングソフトでタイプ練習 (目指せ100keys/min.、150を超えている人は200keys/min.、それ以上の人はTAに挑戦とかいう意味不明な仕様)
FORTRANプログラムを書く (整数加算)

以上で終了。
毎年この学科は真面目で素直な子が多かったのに、今年はどうも例年とは違うようで。
まぁ例年通りトップクラスであればそれでいいのだけど。

書いたプログラム (マニュアル通り)

------------------------------------------------------------------------
C---+-7
      INTEGER M, N, K
      WRITE(*,*) 'Input number m,n'
      READ(*,*) M, N
      
      K = M + N
      
      WRITE(*,*) 'M + N = ', K
      
      STOP
      END
      
------------------------------------------------------------------------

まぁその辺はこちらの対応次第でどーとでもなるわけですが、PCL+システムがまたおかしい挙動…
なんでURL制限してるのにmixiとか野球情報が見れちゃうんだろね…
ソフトウェア的にロックかけるんじゃなくて、もうサーバーでロックかけなよ……

後期授業開始

Tue, 18 Sep 2007 08:00:07 GMT

主教員は痛風(の疑い)
私も不調…orz
しかも小さい演習室なのに大きな演習室よりも人数が多いと来た。(同じ時間に大きな演習室で行われている授業で収容している1.5倍の人数)
オマケに学生(学部2年)は、学生証をなくしているにも関わらず申請すらしていないからIDの再交付すらできないというすばらしい出だし。

ちなみに今日の授業内容。

軽く授業の説明 (何をするだとか、試験は何回するだとか、点数配分だとか)
電源ON！
ログイン <- パスワード忘れてたりしてる子が多いので、これが結構時間がかかるわけで。
授業方針 (txtファイルを送出用ディスプレイで表示)をとりあえず写経
FORTRANプログラムを書いてみる

以上で終了。
まぁ今週は多少の差異はあるでしょうけど、こんな流れで終わりそうな勢い。

全く関係ないけど、安倍総理が本当に潰瘍性大腸炎を煩っているのであれば、1週間やそこらで治る病気じゃないですよ。
経験者はかｔ(ry

本来私があまり言ってはならないのだけど…

Wed, 06 Jun 2007 01:22:44 GMT

水曜午前中に私が担当している学科の奴らはかなりヤヴァい。
授業を受ける側の最低限のマナーすら守らない。
こいつらの状態を一言でいうと、

人の話を聞かない　自分で考えない　非常にうるさい

っていう状態です。
こんな奴らが将来経営に携わるんですかねぇ…（そういう学科なもんで）
少なくとも、こんな奴らに経営やってもらいたくねぇっす。
だって、センターディスプレイに表示されたプログラムを写すことすらできないんですよ、奴ら…orz
勝手に自分で写し間違えてるだけなのに、奇声上げてなんかキレてますし。
授業中に叫んだり、口笛吹いたり、いきなり集団で騒ぎ出したりなんてもう日常茶飯事です。

ちなみに本日、初回授業以来の出席率の高さを誇っております。
本来ならば毎回、この出席率を維持しないといけないんですがね…

この水曜午前中の授業を担当されている先生は、他の学科ならば授業が丁寧でわかりやすいと評判の先生なんですが、こいつらにかかると無理難題を吹っ掛けてくる鬼講師らしいです。
絶対ありえね～～～～～～～～～～～～～～～～～～～～～っ！！
というか、この先生が授業中に怒ることなんてなかったのに、毎時間最低１回は怒るようになってる。
こいつらある意味すげぇよ。
つーかこいつら授業を聞かずにずぅ～～～っとしゃべり続けてるくせに、いざ課題を出すと

なぁ、難しすぎてわからんから教えろや

とか平気で言ってきやがるので、こちらがプチッとキレそうになります。
まぁ私ならまだいいですが、目上の先生に対してタメ口聞くとは何事かと。
あーちなみに私もこいつらからしたら目上ですけどね。

あんまり文句言い続けるとキリがないなので今回はこれで最後。
たった42行のプログラムを写すのに40分も掛かってんじゃねぇよ。
しかもお前ら、入力が苦手とかPCが使えないっていうわけじゃないだろうよ。
ネット見れるようにしてたときはそれはもうすばらしいぐらい流れ作業的に見てやがったんだから。

一応補足しておきますが、ちゃんと真面目な子もいるので。
ただこの学科の場合、20%ぐらいしかマトモに授業受けてる奴がいないんですけどね。
その学科の卒業生の友人がいるんですが、その友人曰く、「うちの学科はバカだから、真面目な奴を見つけるほうが大変」だそうな。

とりあえず、先生2人と私の感想。
水曜日の午前は非常に疲れる…（精神的にも肉体的にも）

漸化式

Tue, 15 May 2007 09:56:04 GMT

基礎情報処理の授業で漸化式ってのはこういう式なんだよってちゃんと式まで書いて示していたにも関わらず、『漸化式がわからないので解けません』とか言われたので、先生がちょっとプチッときてました…

ちょっと数式のほうはこのブログでは書くのがめんどいので省略しますが、要は

X = (X + A / X) / 2.0

と素直に書き直せば済む話だったんですけどね。

生徒にキレ気味で言われたので先生もキレ気味で答えてました。

       REAL A,X
      INTEGER K
      WRITE(*,*) 'Please input a,b.'
      READ(*,*) A,X
          DO 10 K = 1, 10
          X = (X + A / X) / 2.0
          WRITE(*,*) X
   10 CONTINUE
      STOP
      END

とまぁ、こういう感じで書いてくれればそれでよかったんですが…

ちなみにKの値は何でもOKです。

数学的に解析しろとか言ってるわけではなく、収束するところがわかればそれでいいので。

実行結果は以下のとおり。(A = 2、X(0) = 1としています）

 Please input a,b.
2
1
  1.5
  1.41666663
  1.41421568
  1.41421354
  1.41421354
  1.41421354
  1.41421354
  1.41421354
  1.41421354
  1.41421354

ってこれを業務日誌にしていいのか…
まぁ、いいか。

4月9日（月）　月曜日授業

Mon, 09 Apr 2007 18:17:24 GMT

今日の基礎情報処理で教えた内容。

ちなみに私はトラブルには対処しましたがほとんど関与してません。

Windows XPの基礎的な使い方
タイピング
テキストエディタの使い方
拡張子
実際にC言語でHelloを書く

まぁ、こんなもんでしょ最初は。

今回の先生はPCL＋の講習のときに来てなかったそうなので、やはり一から教える羽目に…

私が先生を教えつつ、先生が生徒を教える。

なんか異様だ……orz

とりあえず、よくあった間違い (Helloでね）

このHelloのソースをそのまま写すだけなんですけどね。

#include <stdio.h>

main()
{
    printf("Hello \n");
}

まずよくある間違いのstudio。

#include <studio.h>

main()
{
    printf("Hello \n");
}

次に全角と半角の間違い。

#include <stdio.h>

main()
{
    printf("Hello \n")；
}

あとは綴り間違いや入力忘れ等々

#inclue <stdio.h>

main()
{
    print(Hello \n");
}

まぁ、最初はこんなもんでしょ…

いくら高校で情報A・Bを習っていてもそんなもんでしょう。

環境がガラッと変わる上に隣に座ってる子は知らない子がほとんどなわけですから緊張もしますわな…

本当にそうなのかは疑問ですが。

しかしまぁ、電源の入れ方からログオン方法までをみっちり20分以上かけて教えるのはやらなくてもいいと思う……

とりあえず、月曜日のこの授業は来週からWordの使い方とExcelの使い方を3時間かけてみっちり。

まさか基礎情報処理で私が受け持っている授業の子がこんなところを見てるとは思ってないのですが、私は先生じゃないですから。

あくまで教員補助ですから。

特に基礎情報処理は非常勤講師の方々が多いので、補助は重要なわけで。

たまに授業進行しますが、そういうことはほとんどありません。

つーか教員免許持ってないですし。

あと、先生が煽るんですよね…

『彼に聞いたらなんでも答えてくれるから廊下で出会ったりしたら呼び止めてじゃんじゃん質問したりしてください。ちゃんと答えてくれますから。』

そんなの契約には入ってませんので即却下しますよ、私。

大体廊下で出会ってる時点で時間外ですし、私が廊下を歩いている＝急いでる時なわけで。

というかそういうのは教員の仕事でしょうが。

そんなに教えろというのであれば頼むから時給上げてくれ…

契約内容ならば今の時給でOKだと思いますが、先生らの要求を全部答えてたら時給以上の仕事は絶対やってる。

特に基礎情報処理の2大TA（すなわちPeacefull64と私）は最悪な場合残業手当無しに残業紛いなことやってる…

ボスであるM教授は理解してくれてるのですが、ほかの教員たちには伝わってないのが一番痛いところ。

ちなみに時給はあえて記載しませんが、その辺のコンビニのバイトなんかと比べても低いですね。

今までやってきたバイト（職業も含む）の中で一番低いですから。

もちろん、昔放送していたアニメの登場人物で某GSのアルバイトであるY君の時給255円よりは断然高いですが。

メリットといえば、出勤＝登校なので時間のロスがないってぐらい。

学部生のときはそのメリットは結構大きかったですが、今はまったくメリットがない気がする……

あと、PCL+システムの扱い方を先生方に各自勉強してもらうために情報センターがわざわざ講習を開いたんですから覚えましょうよ……

せっかくしっかりしたマニュアルを配布してもらってるのに、それを読まないで来たらそりゃ使えませんよ。

今回のPCL+は教員用PC1が作業用と制御用を両方兼ねていますがデュアルディスプレイで分離しています。

また教員用PC2が完全に作業用となっています。

PC1とPC2はまったく同じ設定なので、教員から見たらどっちも一緒なんですが、PC2で作業しててUSBフラッシュをPC1で挿してPC2で読み込めないとかいうネタなことはやめていただきたい。

というか、マニュアルを熟読していればあんなミスはしないでしょうよ。（熟読してなくてもあんなミスしませんが…）

あんなことを最初の授業で、しかも新入生の前でやったら先行き不安に感じるでしょうが。

システムが変わってわからないじゃ済まされませんよ？

それを使って授業をすることになってるんですから、それはあなたたち教員の義務です。

とまぁ金曜と月曜の2日だけですでにフラストレーションが溜まりまくっているので愚痴ばっかりなわけですが。

私の研究室の先生なら確実にそんなことはないんですけどねぇ。

むしろ私みたいなTAなんて居なくても授業が成り立つ、あの人は。

4月6日（金）授業開始

Sat, 07 Apr 2007 18:23:32 GMT

まぁ、6日のことなので今更投稿するのもどうかと思いましたが…

授業開始。

いきなり新入生担当だったので、なんかだるぃなぁ～とか思いながら待機室へ。

担当教員の組み合わせを見て……なんだこれうぁっ

2クラスとも微妙な組み合わせ。

1人の先生が普通で、もう一人の先生ができれば授業をご一緒したくないというイワク付きの方という何とも微妙な。

イワク付きの先生同士で固まったら迷わず普通な先生のほうに付くけど、こうもぴったりに同じタイプのイワク付きの先生が分かれてしまうと悩む…

Peacefull64が先に「下の階のクラスがいい」って言い出したので、とりあえずそれに添った形で上の階のクラスへ。

そして140冊のマニュアルを運びつつ、演習室へ。

準備をしていると先生が入室された。(イワク付の先生の方…）

本日はもう一人の先生（普通な先生の方）が事情で来られないというショッキングな話をいきなりされて、早速萎える。

その後、その授業担当のボスであるM教授が代理で来られたので、なんとか私の精神は安定。

早速マニュアルを配り、授業開始。

初回でしかも新入生なのでトラブルが起きるかなとスタンバイしてたら、先生にトラブル発生……

いきなりかよっ！

予想はしてたんですが、その先生はPCL+システムが使えない……（私と一緒にPCL+システムの講習受けてます、その先生…)

一から私が教えつつ、授業を進行してたわけですが、アレは参った。

最初の10分で激しく萎えた。

休憩時間に下の階で授業を見ているPeacefull64に「頼むから替わってくれ…」って素で言ってしまった……

Peacefull64には「…がんばれっ！」で追い返されましたけど。

その後も授業というよりはなんか意味不明な話が延々と続き、休憩時間になっているにもかかわらず意味不明に延長。

本人曰く、「M先生がいる間にプリンタの使い方もやってしまおう」。

なんなんだろう、これ。

ちなみに生徒にはほとんどトラブルはなく、無事終了。

午前中の萎える授業が終わり、アシスタント業務は終了・・・・・・だったはずなのに次の時間に入っている子が来ない…

というわけで昼食抜きで次の授業も担当に…

とりあえず、無駄に疲れた。