Любые книги и чё-нить про них
Ответ на чё-нить: читай краткое содержание выбранных книг и списывай фрагменты краткого содержания
Море-горе-гора-пора-пара-папа-сапа-Саша-суша.
, где i - размер единицы (ну там символа или... цвета, не знаю) в битах, а n - количество сочетаний (палитра, например)
Насколько я понимаю, так:)
Var sum,i : Integer;
Begin
sum:=0;
For i:=1 to 10 do sum:=sum+i;
Writeln(sum);
end.
Но проще всего это считать без циклов - одной строкой:
Begin
Writeln((10+1)*10 div 2);
end.