2·2·2·2·2·2·2·2·2·2·2·2·2·2·2 = 32768
Просто разрешение файлов и всё...
.cpp
.pas
.pt
.jpg
Var x,y:byte;
begin
writeln('В каждом углу комнаты сидела по кошке.');
write('У каждой кошки по х котят. Введите x=');
readln(x);
writeln('Сколько всего ног?');
writeln();
writeln('В комнате 4 угла, следовательно 4 кошки');
writeln('4 кошки по ',x,' котят = всего ', 4*x ,' котят');
//4 кошки + котята
y:=4 + 4*x;
writeln('Всего кошек и котят = ', y);
writeln('следовательно ног у кошек и котят = ', 4*y );
end.
var
n, i, P: <em>integer</em>;
begin
P := 552;
for i := 0 to 12 do
begin
writeln(String.Format('{0} лет - {1} бел. / 1400 км2', i, P));
P += trunc(P * 0.2);
end;
<span>end.</span>