Show the (decimal) value of a number of 1s appended with a 3, then squared: Difference between revisions

Added Algol 68
m (→‎{{header|Phix}}: more simplifications)
(Added Algol 68)
Line 37:
11111113 123456832098769
111111113 12345679432098769</pre>
 
=={{header|ALGOL 68}}==
Assuming LONG INT is large enough (as in e.g. ALGOL 68G).
<lang algol68>BEGIN
LONG INT n := 0;
FOR i TO 8 DO
LONG INT n3 = ( n * 10 ) + 3;
print( ( whole( n3, 0 ), " ", whole( n3 * n3, 0 ), newline ) );
n *:= 10 +:= 1
OD
END</lang>
{{out}}
<pre>
3 9
13 169
113 12769
1113 1238769
11113 123498769
111113 12346098769
1111113 1234572098769
11111113 123456832098769
</pre>
 
=={{header|C#|CSharp}}==
3,032

edits