Кактус
пальма
ромашка
123456789009876543211
Дары чистого сердца-это не таланты. Это состояние души при рождении, и до конца жизненного пути человека. Это сущность отдельной особи. Что бы сберечь их нужно подбадривать такого человека творить добро, такому человеку нельзя причинять сильную моральную боль, и если у него есть такие таланты и они поддержаны, то это будет человек-чудо. Ведь таких людей очень мало на нашей Земле.
Вступая в новую жизнь, мальчик прощается со своими преподавателями и родителями, которые воспитывали его до самого совершеннолетия, он переезжает с родительского крова в свой личный дом и заводит семью. В своём сердце он унесёт тёплые воспоминания и любовь со стороны родителей и преподавателей, которые прошли с ним 11 лет и подняли с колен на ноги.
Program Kr_2_4;
Var k, N, P, S: Integer;
Begin
Write('введите N: '); ReadLn(N);
P := 1;
S := 3;
For k := 1 TO N Do
Begin
P := P*S;
S := S*2;
End;
WriteLn('Ответ: ', P)
End.
Держи 3ью задачу
Program Kr_2_5;
Var k : Integer; a: array [1..100] of integer;
Begin
For k := 1 TO 100 Do
Begin
if (k mod 2 = 0) then a[k] := a[k] + k else a[k] := a[k] - k;
End;
End.
Держи 4ую задачу