|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artur Penttinen 2:5020/400 11 Aug 2000 13:10:56
To : Alexander Voytsekhovsky
Subject : Re: Why
--------------------------------------------------------------------------------
Alexander Voytsekhovsky <Alexander.Voytsekhovsky@p121.f69.n4625.z2.fidonet.org>
wrote:
AV> ׶ó, ïðèâåòèê All!
AV>
AV> Ëþäè, ìîæ ïîäñêàäèòå ÷å íå ðàáîòàåò
AV> Ãîâîðèò, ÷òî îøèáêà â ñòðîêàõ îòìå÷åííûõ çâåçäî÷êîé
AV> *ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ* [ Hà÷àëî FERZ.PL ] *ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ*
AV> $MaxG = 4;
AV> $MaxV = 4;
AV> @G = ();
AV> $V = 1;
AV> $G[$V] = 0;
AV> while ($V > 0)
AV> {
AV> * $V = $V-1 while ($G[$V] == $MaxG);
AV> If ($V > 0)
AV> {
AV> $G[$V] = $G[$V] + 1;
AV> print @G if ($V == $MaxV);
AV> }
AV> *}
AV> *ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ* [ Êîíåö FERZ.PL ] *ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ*
À êàêÿ îøèáêà? Ó ìåíÿ íå ðóãàåòñÿ.
WBW, Artur
--
-Äàðåííîìó êîíþ êóëàêàìè íå ìàøóò
--- ifmail v.2.15dev5
* Origin: Bits & Bobs Inc. (2:5020/400)
Âåðíóòüñÿ ê ñïèñêó òåì, ñîðòèðîâàííûõ ïî: âîçðàñòàíèå äàòû óìåíüøåíèå äàòû òåìà àâòîð
| Òåìà: |
Àâòîð: |
Äàòà: |
|
Why |
Alexander Voytsekhovsky |
10 Aug 2000 09:17:04 |
 Re: Why |
Alex Yarochkin |
11 Aug 2000 09:39:44 |
 Why |
Kostya Belous |
12 Aug 2000 10:37:00 |
 Why |
Alexey Froloff |
12 Aug 2000 13:45:50 |
|
Re: Why |
Artur Penttinen |
11 Aug 2000 13:10:56 |
|
Re: Why |
Ivan Frolcov |
11 Aug 2000 13:30:51 |
|
Re: Why |
Igor Nikolaev |
11 Aug 2000 05:27:41 |
|
|
