Как решить такие задачки по информатике (паскаль)

Думать головой. Сами по себе (методом тыка) эти задачи не решатся. Во всех этих задачах следует использовать циклы. 1. Использовать цикл: P:=1; i:=2; while i<=20 do begin P:=P*i; i:=i+3; end; 2. То же самое: B:=1; i:=1; while i<=101 do begin B:=B*i; i:=i+2; end; 3. А здесь следует использовать вложенные циклы: C:=0; for k:=2 to 50 do for j:=1 to k do C:=C+j; Во всех случаях в начале программы объявляем переменные и не забываем написать Begin: var i,j,k: Integer; P,B,C: LongInt; Begin А в конце программы вывести на экран результат и написать End.: Writeln(P); {в зависимости от задачи здесь вместо P может быть B или C} Readln; End.

какие задачи, пиши мне в ящик