Трынделка первая... Добропожаловательская....

[Мышка]

Сижу и хихикаю в одного:http://kemerovo.drom.ru/gaz/volga/6463058.html
Неправильно. Пусть остальные тоже хихикают!

я рыдаюуууууууууу :rofl: :rofl: :rofl:

[Мышка]

С садиковской компенсацией отдельная история у нас, в декабре пришла в сад как-то за дочей, а мне говорят, нате бумажку, пишите отказ :ohmy: Ну фиг с ним, написала. Щас сидим дома, медотвод у нас, за день до окончания подачи заявлений мне мама мальчика из нашей группы сказала, что завтра утром надо сбегать, с копиями каких-то доков, написать. А где сделать копии в 9 вечера и каких доков .. хз... короче опять пропарила я всё.

[йес]

я с копиями просто поступаю -- отсканила все документы, какие есть и в нужный момент просто печатаю дома или в офисе на принтере. для садика нужен твой паспорт (копия) и св-во о рождении ребенка. всё.

[Веснушка]

паспорт (1я страница и прописка), свидетельство о рождении, реквизиты счета не забудьте

[онаПАНДА]

девочки-умелицы, кто возьмётся связать за денежку ажурные шапочки и болеро на 3 девочек? нам будет нужно :coffee:

[Ева]

Забыла заплатить за Интернет...щас отключат...
Ладно,хоть спать лягу раньше ))

[Мышка]

Ох ты блин, точно же, платить надо, забылаа :)

[Мышка]

девочки-умелицы, кто возьмётся связать за денежку ажурные шапочки и болеро на 3 девочек? нам будет нужно :coffee:

Света, обратись вот в эту тему: http://www.59da.ru/index.php?option=com ... 1&Itemid=0
Нам Маша-Кактусенок связала отпадную шапульку (в дневничке у меня выложена, пост 524: http://www.59da.ru/index.php?option=com ... id=0#67659 )
Ещё чуть позже на весну закажу ей (тоже для трёх девочек, мне и дочкам :cheer: )

[Valic]

Весна пришла! Всех поздравляю!
Пора трынделку переименовывать

[barbariska]

Всех с весной!!!

[olimpiada80]

Девочки, есть кто в бейсике разбирается? прога QBASIK

Не понимаю, где накосячила - не идет программа, хоть убейся
Посмотрите, пожалуйста :rose:

[spoiler]DIM X(15) AS SINGLE
DATA -5.5, 3, 18.4, -45.6, -52, 65, -11, -7, 14.1, 21.3, 7, -6, 8, 4, -2.5,4
FOR I = 1 TO 15
READ X(I)
NEXT I
R1 = 0
R2 = 0
K1 = 0
K2 = 0
FOR I = 1 TO 15
IF X(I) > 0 THEN
R1 = R1 + X(I)
K1 = K1 + 1
ELSE
R2 = R2 + X(I)
K2 = K2 + 1
END IF
NEXT I
R1 = R1 / K1
R2 = ABS(R2 / K2)
PRINT 'R1=',R1,' R2=',R2'
IF R1 > R2 THEN
PRINT 'R1>=R2'
ELSE 'R2>R1'
END IF
END
[/spoiler]

[Arbuzik]

А что не идет-то? Ошибку выдает?

R1 = R1 / K1
R2 = ABS(R2 / K2)

Не хотите перед возможным делением на ноль проверку вставить?

IF R1 > R2 THEN
PRINT 'R1>=R2'
ELSE PRINT 'R2>R1'
END IF
END

А ваще не знаю. QBASIK последний раз видела в 1996 :ohmy: вот такая я старая

[Танюра]

девочки-умелицы, кто возьмётся связать за денежку ажурные шапочки и болеро на 3 девочек? нам будет нужно :coffee:

Можно еще teres спросить она любит вязать крючком на девочек:-)