Dodaj wpis w tym temacie
Spis tematów | Strona: 1 2 ... 19 20 21 ... 30 31 Wyślij wiadomość do admina |
Przewiń wpisy ↓ | Turbo Pascal dla zielonych |
2010-09-30 (19:43)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 633 [ CZCIONKA MONOSPACE ] |
2010-09-30 (19:58)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 637 [ CZCIONKA MONOSPACE ] masz until (koniec pętli) a brakuje początku. zapomniałeś po begin - na samej gorze o Repeat. |
2010-09-30 (19:59)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 638 [ CZCIONKA MONOSPACE ] po co repeat po begin ? |
2010-09-30 (20:02)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 640 [ CZCIONKA MONOSPACE ] Do tego until na dole co dopisałem, to jest repeat na górze po begin ? Bo na twoim obrazku nie widzę, dodatkowego until niżej tylko to repeat . |
2010-09-30 (20:04)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 642 [ CZCIONKA MONOSPACE ] Teraz tak po dodaniu wylosowanych liczb program się wyłącza. Pewnie dlatego, że jest więcej niż 500 lini w notatniku i to trzeba jakoś zmienić. Tzn, żeby za każdym razem jak się dodaje nowe losowanie nie zmieniać na : 1..501 1..502 itd. Poza tym dodaje mi źle losowania o tak : |
2010-09-30 (20:09)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 644 [ CZCIONKA MONOSPACE ] po ostatnim losowaniu : 20 |
2010-09-30 (20:11)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 645 [ CZCIONKA MONOSPACE ] po ostatnim losowaniu 20... 45 daj enter i zapisz plik txt zmnień zakres Tab z 1..500 na 1..1000 bo nie mieszczą Ci sięnowe |
2010-09-30 (20:12)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 647 [ CZCIONKA MONOSPACE ] Nie rozumiem Brakuje modyfikacji z 1..500 I wyrazy gdzieś żeby dodawał wyniki w następnej linijce |
2010-09-30 (20:14)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 648 [ CZCIONKA MONOSPACE ] Działa, ale przed dodaniem 501 losowania piszę mi że załadowano 501 losowań a nie 500. Tak jak by program mówił mi : załadowałem 500 losowań i ta spację na dole. |
2010-09-30 (20:15)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 649 [ CZCIONKA MONOSPACE ] na początku gdzie definiujemy zmienne var Tab : array [1..6,1..1000] itd |
2010-09-30 (20:20)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 651 [ CZCIONKA MONOSPACE ] Mam się tym nie przejmowac ? dodało dobrze 2 losowania i spacja na dole. Wyników w notatniku mam 1 2 3 ... 502 [spacja] odpalam program piszę ; załadowano 503 losowania I coś się zwaliło jeszcze z dodawaniem liczb ( tych 15 ) Wpisuję 15 tak : 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 [naciskam enter] I wyskakuje : Twoje liczby to 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 15 ? wtf ? |
2010-09-30 (20:21)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 652 [ CZCIONKA MONOSPACE ] Tak jak by podwajało ostatnią wpisaną liczbę . Chcę jeszcze dodać możliwość wyjścia z programu w jednym miejscu nie wiem czy mi się uda. |
2010-09-30 (21:16)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 678 [ CZCIONKA MONOSPACE ] Ładne wciery dostajemy od Brazylii wystarczy zamiast y wpisać y-1 i już pokaże ci właściwą ilość losowań po prostu przeskakuje linie dalej i już ją liczychoć jest pusta , bez losowań, przygotowana do zapisu |
2010-09-30 (21:38)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 683 [ CZCIONKA MONOSPACE ] Dobra kurka nie marudzę już. Twoje liczby to 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 15 ? wtf ? Dodaje mi 2 15 i nie wiem co jest źle. Jak przekształcić to i wstawić tam gdzie strzałka, abym przed wpisaniem 15 liczb mógł wyjść z programu ? |
2010-09-30 (21:46)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 690 [ CZCIONKA MONOSPACE ] W II secie Ruciak nieźle tnie (choć nie duży) i jest w okolicy remisu Spoke 2 razy kazałeś napisać mu to napisał 2 razy 15 jak zmieniasz coś to popatrz jak jest u mnie dokładnie for a:=1 to 15 albo a:=1 to 14 i wtedy na końcu jeszcze jest writeln(T(15)); a ty każesz wyświetlić 15 liczb a póxniej jeszcze 15 liczbę |
2010-09-30 (21:49)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 691 [ CZCIONKA MONOSPACE ] Wiem już zauważyłem sorki. Zrezygnowałem z kropki i przecinków w liczbach. Chcę jeszczę mieć możliwość wyjścia z programów na różnych etapach. I mogę ruszyć dalej z sumą. |
2010-09-30 (21:52)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 694 [ CZCIONKA MONOSPACE ] To nie tam gdzie strzałka a nieco wyżej , możesz wpisać pytanie czy zakończyć czy nie , więc nie na zasadzie jak niżej chcesz pobrać i przepiać a na zasadzie jak wcześniej było : czy wprowadzić nowe losowania czy nie |
2010-09-30 (22:03)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 700 [ CZCIONKA MONOSPACE ] Dobra ja już nie mam siły ![]() koniec pas. |
2010-09-30 (22:03)![]() Data rejestracji: 2009-01-23 Ilość postów: 2551 ![]() | wpis nr 360 701 [ CZCIONKA MONOSPACE ] 2:0 przegrywamy będzie ciężko ale 3 set będzie dla nas ![]() Spoke daj spokój na razie z kombinacjami bo jeszcze program nic nie robi , no może dopisuje nowe losowania, dalej Suma to zmienna musisz ją na gorze umieścić następna to S , na wszelki wypadek niech będą typu word bo czasem cudem z 15 trafione będzie 6 i suma >255 może się cudem zdarzyć. |
2010-09-30 (22:08)![]() Data rejestracji: 2008-12-15 Ilość postów: 4663 ![]() | wpis nr 360 703 [ CZCIONKA MONOSPACE ] var a,x : byte; dana,y,S : word; wyniki : text; Tab: array[1..6,1..1000]of longint; T: array[1..15] of word; koniec,nowe,suma : char ?? |
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lotto | Strona: 1 2 ... 19 20 21 ... 30 31 Wyślij wiadomość do admina |