!!! .
EOLN EOF
{ , }
var a:array [1..50,1..50] of char;
i,j:integer;
begin
assign (input,'input.txt');
reset (input);
assign (output,'output.txt');
rewrite (output);
i:=1;
while not eof (input) do { }
begin
j:=1;
while not eoln (input) do { }
begin
read (a[i,j]);
inc (j);
end;
readln;
inc(i);
end;
n:=i 1; { n }
m:=j 1; { m }
close (input);
close (output);
end.
1. , 3 .
2. ,
3. , .
4. (: 1 . : 16 )
"" ("Minesweeper").
| input.txt | output.txt | |
| 10 9 23 1 8 2 3 3 2 3 3 4 3 5 7 6 7 7 1 7 2 7 3 7 4 7 5 7 6 7 7 7 8 8 1 8 3 8 5 8 7 9 3 9 5 9 6 9 7 | .111..1*1 13*2..111 1**3..... 13*2.111..111.2*2. 233335*41 ********1 *6*7*8*41 13*4***2..1122321. |
"" . ( ) NxM (N , M ). K , 1 8 , , . , , . . - . , , , . , .
, , , , . . , , . N, M K , . . ! N, M, K .
INPUT.TXT N, M K (1<=N<=200, 1<=M<=200, 0<=K<=N*M). K , , . , , . (1,1), (N,M).
|
|
|
OUTPUT.TXT N M . j- i- * () (i,j) , 1 8, , . (), (i,j) .
5. (: 1 . : 16 )
. n m ( n x m ). , , .
. , , n m . - : - R, - G, - B -.().
. - , . . :
| input.txt | output.txt | |
| 3 3.GB R.B RG. 0 1 2 3 4 5 6 7 0 | NO | |
| 2 3 RGB.G. 7 7 7 7 7 7 | YES |
- 0 - ;
- 1 - ;
- 2 - ;
- 3 - , ;
- 4 - ;
- 5 - , ;
- 6 - , ;
- 7 - , , .
, : .
INPUT.TXT n m (1 <= n, m <= 100). n m - . {R, G, B,.}. .
. n m , . .
: OUTPUT.TXT YES, NO - .
| input.txt | output.txt | |
| 4 2 2 -2 2 -2 -2 2 -2 | ||
| 6 2 2 -2 2 -2 -2 2 -2 1 1 -1 3 |
6. (: 1 . : 16 )
. . , , , .
, . ( ). , .
|
|
|
INPUT.TXT N (N ≤ 20). N , X Y (-10 <= X, Y <= 10).
OUTPUT.TXT , .
