jackfiled
89ce313b77
Reviewed-on: https://git.bupt-hpc.cn/jackfiled/CanonSharp/pulls/4 Co-authored-by: jackfiled <xcrenchangjun@outlook.com> Co-committed-by: jackfiled <xcrenchangjun@outlook.com>
310 lines
20 KiB
ObjectPascal
310 lines
20 KiB
ObjectPascal
program main;
|
|
var a,res,n,i: integer;
|
|
begin
|
|
n := 2;
|
|
for i := 0 to n - 1 do
|
|
begin
|
|
res := 0;
|
|
a := 1;
|
|
if (a > 0) and (a < 100) then
|
|
if (a > 0) and (a < 99) then
|
|
if (a > 0) and (a < 98) then
|
|
if (a > 0) and (a < 97) then
|
|
if (a > 0) and (a < 96) then
|
|
if (a > 0) and (a < 95) then
|
|
if (a > 0) and (a < 94) then
|
|
if (a > 0) and (a < 93) then
|
|
if (a > 0) and (a < 92) then
|
|
if (a > 0) and (a < 91) then
|
|
if (a > 0) and (a < 90) then
|
|
if (a > 0) and (a < 89) then
|
|
if (a > 0) and (a < 88) then
|
|
if (a > 0) and (a < 87) then
|
|
if (a > 0) and (a < 86) then
|
|
if (a > 0) and (a < 85) then
|
|
if (a > 0) and (a < 84) then
|
|
if (a > 0) and (a < 83) then
|
|
if (a > 0) and (a < 82) then
|
|
if (a > 0) and (a < 81) then
|
|
if (a > 0) and (a < 80) then
|
|
if (a > 0) and (a < 79) then
|
|
if (a > 0) and (a < 78) then
|
|
if (a > 0) and (a < 77) then
|
|
if (a > 0) and (a < 76) then
|
|
if (a > 0) and (a < 75) then
|
|
if (a > 0) and (a < 74) then
|
|
if (a > 0) and (a < 73) then
|
|
if (a > 0) and (a < 72) then
|
|
if (a > 0) and (a < 71) then
|
|
if (a > 0) and (a < 70) then
|
|
if (a > 0) and (a < 69) then
|
|
if (a > 0) and (a < 68) then
|
|
if (a > 0) and (a < 67) then
|
|
if (a > 0) and (a < 66) then
|
|
if (a > 0) and (a < 65) then
|
|
if (a > 0) and (a < 64) then
|
|
if (a > 0) and (a < 63) then
|
|
if (a > 0) and (a < 62) then
|
|
if (a > 0) and (a < 61) then
|
|
if (a > 0) and (a < 60) then
|
|
if (a > 0) and (a < 59) then
|
|
if (a > 0) and (a < 58) then
|
|
if (a > 0) and (a < 57) then
|
|
if (a > 0) and (a < 56) then
|
|
if (a > 0) and (a < 55) then
|
|
if (a > 0) and (a < 54) then
|
|
if (a > 0) and (a < 53) then
|
|
if (a > 0) and (a < 52) then
|
|
if (a > 0) and (a < 51) then
|
|
if (a > 0) and (a < 50) then
|
|
if (a > 0) and (a < 49) then
|
|
if (a > 0) and (a < 48) then
|
|
if (a > 0) and (a < 47) then
|
|
if (a > 0) and (a < 46) then
|
|
if (a > 0) and (a < 45) then
|
|
if (a > 0) and (a < 44) then
|
|
if (a > 0) and (a < 43) then
|
|
if (a > 0) and (a < 42) then
|
|
if (a > 0) and (a < 41) then
|
|
if (a > 0) and (a < 40) then
|
|
if (a > 0) and (a < 39) then
|
|
if (a > 0) and (a < 38) then
|
|
if (a > 0) and (a < 37) then
|
|
if (a > 0) and (a < 36) then
|
|
if (a > 0) and (a < 35) then
|
|
if (a > 0) and (a < 34) then
|
|
if (a > 0) and (a < 33) then
|
|
if (a > 0) and (a < 32) then
|
|
if (a > 0) and (a < 31) then
|
|
if (a > 0) and (a < 30) then
|
|
if (a > 0) and (a < 29) then
|
|
if (a > 0) and (a < 28) then
|
|
if (a > 0) and (a < 27) then
|
|
if (a > 0) and (a < 26) then
|
|
if (a > 0) and (a < 25) then
|
|
if (a > 0) and (a < 24) then
|
|
if (a > 0) and (a < 23) then
|
|
if (a > 0) and (a < 22) then
|
|
if (a > 0) and (a < 21) then
|
|
if (a > 0) and (a < 20) then
|
|
if (a > 0) and (a < 19) then
|
|
if (a > 0) and (a < 18) then
|
|
if (a > 0) and (a < 17) then
|
|
if (a > 0) and (a < 16) then
|
|
if (a > 0) and (a < 15) then
|
|
if (a > 0) and (a < 14) then
|
|
if (a > 0) and (a < 13) then
|
|
if (a > 0) and (a < 12) then
|
|
if (a > 0) and (a < 11) then
|
|
if (a > 0) and (a < 10) then
|
|
if (a > 0) and (a < 9) then
|
|
if (a > 0) and (a < 8) then
|
|
if (a > 0) and (a < 7) then
|
|
if (a > 0) and (a < 6) then
|
|
if (a > 0) and (a < 5) then
|
|
if (a > 0) and (a < 4) then
|
|
if (a > 0) and (a < 3) then
|
|
if (a > 0) and (a < 2) then
|
|
res := res + 1
|
|
else
|
|
res := res + 2
|
|
else
|
|
res := res + 3
|
|
else
|
|
res := res + 4
|
|
else
|
|
res := res + 5
|
|
else
|
|
res := res + 6
|
|
else
|
|
res := res + 7
|
|
else
|
|
res := res + 8
|
|
else
|
|
res := res + 9
|
|
else
|
|
res := res + 10
|
|
else
|
|
res := res + 11
|
|
else
|
|
res := res + 12
|
|
else
|
|
res := res + 13
|
|
else
|
|
res := res + 14
|
|
else
|
|
res := res + 15
|
|
else
|
|
res := res + 16
|
|
else
|
|
res := res + 17
|
|
else
|
|
res := res + 18
|
|
else
|
|
res := res + 19
|
|
else
|
|
res := res + 20
|
|
else
|
|
res := res + 21
|
|
else
|
|
res := res + 22
|
|
else
|
|
res := res + 23
|
|
else
|
|
res := res + 24
|
|
else
|
|
res := res + 25
|
|
else
|
|
res := res + 26
|
|
else
|
|
res := res + 27
|
|
else
|
|
res := res + 28
|
|
else
|
|
res := res + 29
|
|
else
|
|
res := res + 30
|
|
else
|
|
res := res + 31
|
|
else
|
|
res := res + 32
|
|
else
|
|
res := res + 33
|
|
else
|
|
res := res + 34
|
|
else
|
|
res := res + 35
|
|
else
|
|
res := res + 36
|
|
else
|
|
res := res + 37
|
|
else
|
|
res := res + 38
|
|
else
|
|
res := res + 39
|
|
else
|
|
res := res + 40
|
|
else
|
|
res := res + 41
|
|
else
|
|
res := res + 42
|
|
else
|
|
res := res + 43
|
|
else
|
|
res := res + 44
|
|
else
|
|
res := res + 45
|
|
else
|
|
res := res + 46
|
|
else
|
|
res := res + 47
|
|
else
|
|
res := res + 48
|
|
else
|
|
res := res + 49
|
|
else
|
|
res := res + 50
|
|
else
|
|
res := res + 51
|
|
else
|
|
res := res + 52
|
|
else
|
|
res := res + 53
|
|
else
|
|
res := res + 54
|
|
else
|
|
res := res + 55
|
|
else
|
|
res := res + 56
|
|
else
|
|
res := res + 57
|
|
else
|
|
res := res + 58
|
|
else
|
|
res := res + 59
|
|
else
|
|
res := res + 60
|
|
else
|
|
res := res + 61
|
|
else
|
|
res := res + 62
|
|
else
|
|
res := res + 63
|
|
else
|
|
res := res + 64
|
|
else
|
|
res := res + 65
|
|
else
|
|
res := res + 66
|
|
else
|
|
res := res + 67
|
|
else
|
|
res := res + 68
|
|
else
|
|
res := res + 69
|
|
else
|
|
res := res + 70
|
|
else
|
|
res := res + 71
|
|
else
|
|
res := res + 72
|
|
else
|
|
res := res + 73
|
|
else
|
|
res := res + 74
|
|
else
|
|
res := res + 75
|
|
else
|
|
res := res + 76
|
|
else
|
|
res := res + 77
|
|
else
|
|
res := res + 78
|
|
else
|
|
res := res + 79
|
|
else
|
|
res := res + 80
|
|
else
|
|
res := res + 81
|
|
else
|
|
res := res + 82
|
|
else
|
|
res := res + 83
|
|
else
|
|
res := res + 84
|
|
else
|
|
res := res + 85
|
|
else
|
|
res := res + 86
|
|
else
|
|
res := res + 87
|
|
else
|
|
res := res + 88
|
|
else
|
|
res := res + 89
|
|
else
|
|
res := res + 90
|
|
else
|
|
res := res + 91
|
|
else
|
|
res := res + 92
|
|
else
|
|
res := res + 93
|
|
else
|
|
res := res + 94
|
|
else
|
|
res := res + 95
|
|
else
|
|
res := res + 96
|
|
else
|
|
res := res + 97
|
|
else
|
|
res := res + 98
|
|
else
|
|
res := res + 99
|
|
else
|
|
res := res + 100;
|
|
write(res);
|
|
end;
|
|
end.
|