На столе лежат две кучи конфет. Малыш и Карлсон играют в игру. Они ходят по очереди. За один ход можно взять либо одну конфету из любой кучи, либо по одной из каждой кучи. Выигрывает тот, кто возьмет со стола последнюю конфету. Первоначально в первой куче M конфет, во второй - N конфет. Известно, что числа M и N таковы, что при своей правильной игре Карлсон (он ходит первым) выигрывает независимо от того, как играет Малыш. Для заданных чисел M и N определить первый правильный ход Карлсона. Входные данные
Содержится два числа M и N, разделенных пробелом (0 M, N 100).
Выходные данные
Необходимо вывести выигрывающий ход Карлсона - два числа a и b через пробел, где a - число конфет, которое Карлсон берет из первой кучи, b - число конфет, которое Карлсон берет из второй кучи.
никак не пойму как решить
Пусть а - наибольшая из сторон, тогда против нее будет лежать наибольший угол, который можно определить по теореме косинусов:
Текст программы приводится ниже.
var
a,b,c,t,cosA:real;
begin
Write('Введите длины сторон треугольника: '); Readln(a,b,c);
if (a<b+c) and (b<a+c) and (c<a+b) then
begin
if a>b then
begin
if a<c then begin t:=a; a:=c; c:=t end
end
else
if b>c then begin t:=a; a:=b; b:=t end
else begin t:=a; a:=c; c:=t end;
cosA:=(sqr(c)+sqr(b)-sqr(a))/(2*b*c);
if cosA=0 then Writeln('Треугольник прямоугольный')
else
if cosA<0 then Writeln('Треугольник тупоугольный')
else Writeln('Треугольник остроугольный')
end
else
Writeln('Треугольник построить нельзя')
end.
Тестовое решение:
Введите длины сторон треугольника: 4 6.1 3.7
Треугольник тупоугольный
percent = 13.0;
limit = 250.0;
plan = 180.0;
perv_zapas = 1000.0;
var
year: integer;
zapas, ulov: real;
begin
Writeln('Год Запас рыбы,т. Улов,т');
zapas := perv_zapas;
for year := 1 to 20 do
begin
zapas := zapas * (1 + percent / 100);
if zapas - plan < 250 then ulov := zapas - 250
else ulov := plan;
zapas := zapas - ulov;
if ulov >= plan then Writeln(year:2, zapas:10:1, ulov:12:1)
else Writeln(year:2, zapas:10:1, ulov:12:1, ' - меньше плана')
end
end.
Результат выполнения программы:
Год Запас рыбы,т. Улов,т
1 950.0 180.0
2 893.5 180.0
3 829.7 180.0
4 757.5 180.0
5 676.0 180.0
6 583.9 180.0
7 479.8 180.0
8 362.1 180.0
9 250.0 159.2 - меньше плана
10 250.0 32.5 - меньше плана
11 250.0 32.5 - меньше плана
12 250.0 32.5 - меньше плана
13 250.0 32.5 - меньше плана
14 250.0 32.5 - меньше плана
15 250.0 32.5 - меньше плана
16 250.0 32.5 - меньше плана
17 250.0 32.5 - меньше плана
18 250.0 32.5 - меньше плана
19 250.0 32.5 - меньше плана
20 250.0 32.5 - меньше плана