Sylvester's sequence: Difference between revisions
Sylvester's sequence en Verilog
(Sylvester's sequence en Yabasic) |
(Sylvester's sequence en Verilog) |
||
Line 819:
0.99999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999996349359079841301329356
</pre>
=={{header|Verilog}}==
<lang Verilog>
module main;
integer i;
real suma, num;
initial begin
$display("10 primeros términos de la sucesión de sylvester:");
$display("");
suma = 0;
num = 0;
for(i=1; i<=10; i=i+1) begin
if (i==1) num = 2;
else num = num * num - num + 1;
$display(i, ": ", num);
suma = suma + 1 / num;
end
$display("");
$display("suma de sus recíprocos: ", suma);
$finish ;
end
endmodule
</lang>
{{out}}
<pre>10 primeros términos de la sucesión de sylvester:
1: 2.00000
2: 3.00000
3: 7.00000
4: 43.0000
5: 1807.00
6: 3.26344e+06
7: 1.06501e+13
8: 1.13424e+26
9: 1.28649e+52
10: 1.65507e+104
suma de sus recíprocos: 1.00000</pre>
=={{header|Wren}}==
| |||