Pascalは、if then begin end else begin end;　だっけ？＞＜(ずっと使ってなくてわかんなくなった＞＜；)