в помощь таблица со степенями двойки
1)берем число , и отнимаем максимально возможное из таблицы, с ответом то делаем то же , и под отнимаемыми числами пишем 1 все остальное - нули
2)то же самое , только наоборот : складываем все числа , под которыми 1
2 Мартышки = 10 кг
Мартышка = 5 кг
Мартышка + 1 кг = 3 Капуцины
5+1кг = 3 Капуцины
Капуцина = 2 кг
Капуцина+Мартышка = Гиббон
5+2 = Гиббон
Гиббон = 7 кг
Мартышка + 3 Гиббона = Павиан + Капуцина
5кг+3×7=Павиан + 2 кг
26кг=Павиан + 2 кг
24кг= Павиан.
Отсюда:
Мартышка = 5 кг.
Капуцина = 2 кг.
Гиббон = 7 кг.
Павиан = 24 кг.
Msk.psu.ivanov; msk.psu.petrov;
msk.pstu.sidorov; msk.pstu.popov;
msk.ipkro.s102; msk.ipkro.s108; msk.ipkro.s11
СМОТРИТЕ РЕШЕНИЕ НА ПРИКРЕПЛЁННОМ ФАЙЛЕ
var
a,b,i:integer;
s:longint;
begin
repeat
write('Vvedite chisla a,b=');
readln(a,b);
until a<b;
s:=0;
for i:=a to b do
inc(s,sqr(i));
writeln('Summa kvadratov=',s);
end.