Cullen and Woodall numbers: Difference between revisions
Content added Content deleted
(Cullen and Woodall numbers in various BASIC dialents) |
(Cullen and Woodall numbers en Verilog) |
||
Line 476: | Line 476: | ||
done... |
done... |
||
</pre> |
</pre> |
||
=={{header|Verilog}}== |
|||
<lang Verilog>module main; |
|||
integer n, num; |
|||
initial begin |
|||
$display("First 20 Cullen numbers:"); |
|||
for(n = 1; n <= 20; n=n+1) |
|||
begin |
|||
num = n * (2 ** n) + 1; |
|||
$write(num, " "); |
|||
end |
|||
$display(""); |
|||
$display("First 20 Woodall numbers:"); |
|||
for(n = 1; n <= 20; n=n+1) |
|||
begin |
|||
num = n * (2 ** n) - 1; |
|||
$write(num, " "); |
|||
end |
|||
$finish ; |
|||
end |
|||
endmodule</lang> |
|||
=={{header|Wren}}== |
=={{header|Wren}}== |