Где купить майку ак барс - Интернет приколы

Школа становится своей планетой для многих, точно отметила Фелицата Николаевна!та пустота которой говорил Евгений Александрович, она не просто присуща мне, она как-то выражается слишком остро... просто сейчас душе ничего нет, хочется, нет!!!Перед школой мы частью ком состава ставили последние штрихи перед заездом около недели жили вместе, поэтому мы начали погружаться эту атмосферу чуть раньше остальных.31 июля заехали школу, меня случился культурный шок... когда увидел кучу мебели разбросанной по всему нашему этажу.Покумекали начали ее тромбовать рекреации.Ну вот более менее жить можно...Ночью этого же дня приехали Енисейци смотрю ребят глазах просто шок))) что куда зачем, валить от сель надо...На утро встреча на КПП, завертелось, завелось вот оно ради чего столько трудов.Первые знакомства, первые экипажки, вечерка, огоньки.Начали входить ритм создавать ту атмосферу добра откровения которая присуща школе.Было куча всяких интересных мероприятий, для всех запомнился марафон, баня, страшилки, дикотеки, СТЭМ др.Шла научка интересными дельными лекциями, параллельно игра страны.вот уже день, напоминает где купить майку ак барс том что завтра уже прощалка...

---

ща попытаюсь разобраться )) но она работать перестала чет ща гляну. она вообще отказывается нормально работать ((( надо еще что то думать(((. Всё сделал твою программу, там всё что ты сказал есть.Program Chirko;uses crt;const n=4;var x:array[1..n] of integer; z,q,i,k,j,r:integer;begin clrscr; k:=n; j:=n; for i:=1 to n do readln(x[i]); readln(q);while(x[k]=0) do dec(k);For i:=k downto 1 do z:=z*q+x[i]; i:=1;writeln('Число Х без перестановки элементов равно : ',z);While i<j do Begin r:=x[i]; x[i]:=x[j]; x[j]:=r;Inc(i); Dec(j);End;k:=n; z:=0; {специально обнуляем переменную z}while(x[k]=0) do dec(k);For i:=k downto 1 do z:=z*q+x[i]; i:=1;writeln('Число Х c перестановкой элементов равно : ',z);readkey;end.