Smallest square that begins with n: Difference between revisions
→{{header|F_Sharp|F#}}
Line 43:
41209 4225 4356 441 45369 4624 4761 484 49
</pre>
=={{header|C}}==
<lang c>#include <stdio.h>
void f(int n) {
int i = 1;
if (n < 1) {
return;
}
while (1) {
int sq = i * i;
while (sq > n) {
sq /= 10;
}
if (sq == n) {
printf("%3d %9d %4d\n", n, i * i, i);
return;
}
i++;
}
}
int main() {
int i;
printf("Prefix n^2 n\n");
printf("");
for (i = 1; i < 50; i++) {
f(i);
}
return 0;
}</lang>
{{out}}
<pre>Prefix n^2 n
1 1 1
2 25 5
3 36 6
4 4 2
5 529 23
6 64 8
7 729 27
8 81 9
9 9 3
10 100 10
11 1156 34
12 121 11
13 1369 37
14 144 12
15 1521 39
16 16 4
17 1764 42
18 1849 43
19 196 14
20 2025 45
21 2116 46
22 225 15
23 2304 48
24 2401 49
25 25 5
26 2601 51
27 2704 52
28 289 17
29 2916 54
30 3025 55
31 3136 56
32 324 18
33 3364 58
34 3481 59
35 35344 188
36 36 6
37 3721 61
38 3844 62
39 3969 63
40 400 20
41 41209 203
42 4225 65
43 4356 66
44 441 21
45 45369 213
46 4624 68
47 4761 69
48 484 22
49 49 7</pre>
=={{header|F_Sharp|F#}}==
Line 55 ⟶ 139:
1 25 36 4 529 64 729 81 9 100 1156 121 1369 144 1521 16 1764 1849 196 2025 2116 225 2304 2401 25 2601 2704 289 2916 3025 3136 324 3364 3481 35344 36 3721 3844 3969 400 41209 4225 4356 441 45369 4624 4761 484 49
</pre>
=={{header|Factor}}==
{{trans|Phix}}
| |||