2 в седьмой степени равно 128, N=128
<span>если его поставить так, что бы краёв рядом не было, куда ни-буть в центр. (смотря какой поворот , если поворот маленький то куда не поставь до края дойдёт и остановиться.И ещё смотря какая площадь , там где он стоит)</span>
<span>#include <stdio.h>
int main() {
FILE* in = fopen("input.txt", "r");
char s[100], b = 1, i = 0;
short c;
do {
c = getc(in);
if (c >= '0' && c <= '9') {
if ((b = !b) && /*
*/ (c = getc(in)) == ' ' || c == <span>'\t'</span> || c == <span>'\r'</span> || c == <span>'\n'</span> || c == EOF) {
while (c != <span>'\n'</span> && c != EOF)
c = getc(in);
i = 0;
}
} else if (c == <span>'\n'</span>) {
for (b = 0; b < i; b++)
putchar(s[b]);
putchar(c);
putchar(<span>'\n'</span>);
i = 0;
b = 1;
} else {
s[i++] = c;
b = 1;
}
} while (c != EOF);
fclose(in)<span>;</span></span>
Var myInFile, myOutFile: text;
ind: integer;
currentString: string;
begin
assign(myInFile, 'in.txt');
reset(myInFile);
assign(myOutFile, 'out.txt');
rewrite(myOutFile);
while (not EOF(myInFile)) do
begin
currentString := readln(myInFile);
while (pos('red', currentString) > 0) do
begin
ind := pos(currentString, 'red');
delete(currentString, ind, length('red'));
insert('black', currentString, ind);
end;
while (pos('tree', currentString) > 0) do
begin
ind := pos(currentString, 'tree');
delete(currentString, ind, length('tree'));
insert('palms', currentString, ind);
end;
end;
close(myInFile);
close(myOutFile);
end.
