Я вместе с подругой была в Анапе. Это очень красивое место. Я купалась, веселилась. Вечером на море поднимались большие волны и мы с подругой обожали прыгать в них. На песчаном береге лежало много ракушек. Один раз я даже нашла на песке маленькую морскую звезду.
Также в Анапе очень много интересных мест. Мы были в парке живой природы " До - До" , в небольшом музее восковых фигур и так далее. Мы видели большие скульптуры из песка,которые спокойно стоят, назло всем ветрам.
Но больше всего нам понравилось погружение с аквалангом! Это так захватывающе. У меня сначала не получалось подплыть ко дну, меня тянуло наверх, я волновалась. Но вскоре всё вышло и я смогла понаблюдать за жизнью в глубине моря. Вокруг плавали странные рыбки, и проплывал маленький осминожка.
В следующем году я обязательно снова поеду в Анапу, это место навсегда останется в моём сердце.
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ую задачу
Как то так... размеры поставишь сам!))
У России есть достаточное количество стран-соседей одна из них это Казахстан
по площади 9 место в мире
входит в 50 конкурентоспособных стран
имеет 14 областей и 18городов
президент республики Казахстан Назарбаев НУРСУЛТАН АБИШЕВИЧ
столица Астана
в 2017 году будет проходить выставка ЭКСПО
в Казахстане свыше 130 национальностей
Казахстан первая страна которая отказалась от ядерного оружия
надеюсь столько хватит