TSabc 発言

中村 のりつぐ です。

In article <20030218.180950.58874356.rubikitch@...-lang.org> 
rubikitch <rubikitch@...-lang.org> wrote:
> 初めてLuaで書いてみた。
> 関数には()がいるのか。
> 
> #!/usr/bin/lua
> y = 1
> while y <= 1001 do
>   a = 2003 - y
>   x = 100000 - y
>   b = x / a
>   if mod(x,a) == 0 then
>     print("a=",a)
>     print("b=",b)
>   end
>   y = y + 1
> end

はじめての Pike
(本当に宣言が要るのか？)

#!/usr/bin/env pike

int main()
{
  int a, b, x, y;

  y = 1;
  while (y <= 1001) {
    a = 2003 - y;
    x = 100000 - y;
    b = x / a;
    if (x % a == 0) {
      write("a=%d\n",a);
      write("b=%d\n",b);
    }
    y = y + 1;
  }
  return 0;
}


はじめての tcc (^_^;

#!/usr/bin/env tcc

#include <stdio.h>

int main()
{
  int a, b, x, y;

  y = 1;
  while (y <= 1001) {
    a = 2003 - y;
    x = 100000 - y;
    b = x / a;
    if (x % a == 0) {
      printf("a=%d\n",a);
      printf("b=%d\n",b);
    }
    y = y + 1;
  }
  return 0;
}


はじめての cint # は やめよう…

       中村 典嗣  E-mail:     nnakamur@...