Дорогие подарки для детей : Новогодние товары

дорогие подарки для детей =( Моей некогда близкой подруге нет и 17-ти, а она забеременела. У нее нет матери, плохие отношения с отцом и бабушкой, а ее парень уговаривает ее на аборт...Мы с ней потеряли друг к другу доверие, поэтому она наверное не станет слушать моих советов.

Отвечаю на вопрос! Я со своими друзьями отдыхаю на хортице не часто и вовновном с ночёвкой и на машинах поэтому мы выбрасываем мусор в урны, но ведь многие идут на хортицу пешком, а после употребления еды и питья всё както впадлу и даже самые аккуратные не заметив по близости урны оставляют всё на месте.


Снова дорогие подарки для детей
Вот вторая:Program Balashova_2;uses crt;var a,b:integer; k,ost,temp:integer;begin clrscr;writeln('Enter number A: '); readln(a);writeln('Enter number B: '); readln(b);while (temp<a) do begintemp:=temp+b;if temp>a then begin ost:=a-(temp-b); break; end;inc(k);end;writeln('A divizion B = ',K);writeln('All symbols at point do last symbol of A divizion B = ',ost);readkey; end. вау еще одно решение!!! просто прекраснно. ну у меня еще есть задачи будете решать? Жаль на группу нельзя вывести табличку "КРУГЛОСУТОЧНО". Подсчитать сумму всех нечётных чисел в промежутке от 101 до 301. хех..... а что делать....:))). Program Balashova_3;uses crt;var k,i:integer;begin clrscr;for i:=101 to 301 do if i mod 2 <> 0 then k:=k+i; writeln('Sum: ',k);readkey; end. ну если не спится то можешь и эту решить :)))Подсчитать сумму цифр введённого целого числа (на каждом шаге выделяется последняя цифра числа, затем число делится на 10, процесс повторяется пока число не 0).


Хостинг от uCoz