読者です 読者をやめる 読者になる 読者になる

個人的自由ノート

ふと自分が気になった事を書いてます

プログラミングで問題を解く

少しずつ解いてます。もう少しこなす言語を絞ったほうが良さそうですね…。苦笑。それはそうと、OCamlでクラスの問題に差し掛かったらどうすれば良いのでしょうか。また考えないと。

import java.util.Scanner;

class q6_20 {
    public static void main(String[] args) {
        Scanner scan = new Scanner(System.in);
        System.out.print("行数 : ");
        int column = scan.nextInt();
        int[][] n = new int[column][];
        for(int i = 0; i < column; i++) {
            System.out.print(i + "行目の列数 : ");
            int row = scan.nextInt();
            n[i] = new int[row];
        }
        for(int i = 0; i < n.length; i++) {
            for(int j = 0; j < n[i].length; j++) {
                System.out.print("c[" + i + "]" + "[" + j + "] : ");
                n[i][j] = scan.nextInt();
            }
        }
        for(int i = 0; i < n.length; i++) {
            for(int j = 0; j < n[i].length; j++) {
                System.out.printf("\t%3d", n[i][j]);
            }
            System.out.println();
        }
    }
}
# coding: utf-8
print "要素数 : "
n = gets.chomp.to_i
array = Array.new(n);
for num in 0..n - 1 do
  print "a[#{num}] = "
  array[num] = gets.chomp.to_i
end

puts array.shuffle




# coding: utf-8
print "要素数 : "
n = gets.chomp.to_i
array = Array.new(n);
for num in 0..n - 1 do
  print "a[#{num}] = "
  array[num] = gets.chomp.to_i
end
puts array.reverse
print_string "カウントダウンします。\n";;
let rec answer2 n = print_int n;
                    print_newline();
                    if n == -1 then
                      ()
                    else
                      answer2 (n - 1);;
let rec answer () = print_string "正の整数値 : ";
                    let n = read_int() in
                    if n <= 0 then
                      answer ()
                    else
                      answer2 n;;
answer ();;




print_string "何個*を表示しますか : ";;
let n = read_int()
let rec answer n = print_string "*";
                   if n == 0 then
                     ()
                   else
                     answer (n - 1);;
answer (n - 1);;
print_newline();;