' VBA(PowerPoint2000)

Function IsNear(Point1 As Variant, Point2 As Variant) As Boolean
    IsNear = False
    If Abs(Point1(1, 1) - Point2(1, 1)) < 20# Then

#include <stdio.h>
#include <stdlib.h>
#define XL 8
#define YL 8
#define HN 3

/* ■概要
 * 与えた迷路に対する最短ルートをダイクストラ法で探索するプログラム。
 * 
 * 
 * */

/* ■概要
 * 与えた迷路に対する最短ルートを総当りで探索するプログラム。
 * ■留意点
 * 総当りをする際は、ルート順にマップの配列添字を並べた際、より小さいものから調べる。
 * 調べているルートの方が、既に得られた最短距離より長くなる場合は、それ以降のルートはすべて最短ではないので次のルートを探索する。*/

void print(char *s){
    char *t;
    t=s;
    do{
        if(*t==0x40){

#include <stdio.h>

int main(void){
	int i,j,k,x,y;
	int count0,count1;

/*
760 名前：以下、名無しにかわりましてVIPがお送りします[sage] 投稿日：2010/02/08(月) 22:01:41.87 ID:/VQaDvwV0 (PC)
	input.ppm および sample.ppm は PPMフォーマットのヘッダのないファイルである.
	サイズはそれぞれ 192x256, 64x64 になっている.
	input.ppm および sample.ppmを読み込み, ヘッダ情報をつけてPPM(raw)として出力する

#include <stdio.h>

int  transposed_matrix(int a[2][2]); /* 行列を転置してdet(a)返す関数 */
int  gcd(int a, int b);              /* 最大公約数＠gcd */
void print_matrix(int a[2][2]);      /* 2行2列行列の表示 */

#include <iostream>
#include <string>
#include <list>

using namespace std;