windowsでiverilog その162

概要　

windowsでiverilogやってみた。
練習問題やってみた。

練習問題

九九を書け。

サンプルコード

module test;
	integer p;
	integer stdin = 'h8000_0000;
	integer a,
		b;
	integer ch;
	reg [7:0] pc;
	reg [7:0] str[0:9];
	integer v;
	initial
	begin
		pc <= 10;
		v = 0;
		a = 1;
		b = 1;
	end
	always #1
	begin
		case(pc)
		10:
		begin
			$write("%0d ", a * b);
			a++;
			pc <= 20;
		end
		20:
		begin
			if (a < 10)
			begin
				pc <= 10;
			end
			else
			begin
				pc <= 30;
			end
		end
		30:
		begin
			$write("\n");
			b++;
			a = 1;
			pc <= 40;
		end
		40:
		begin
			if (b < 10)
			begin
				pc <= 10;
			end
			else
			begin
				pc <= 50;
			end
		end
		50:
		begin
			$finish(0);
		end
		endcase
	end
	initial
	begin
		//$monitor(" %d", pc);
	end
endmodule

実行結果

>vvp a.out
1 2 3 4 5 6 7 8 9
2 4 6 8 10 12 14 16 18
3 6 9 12 15 18 21 24 27
4 8 12 16 20 24 28 32 36
5 10 15 20 25 30 35 40 45
6 12 18 24 30 36 42 48 54
7 14 21 28 35 42 49 56 63
8 16 24 32 40 48 56 64 72
9 18 27 36 45 54 63 72 81

以上