🚀 go-pugleaf

dziękuje za informacje - kozystam z FreePascala

Mam pytanie, jak zmienik ten moj kod, by uzytkownik mógł wpisywac tyle iczb 
chce.... a gdy wpisze tyle ile chce to naciska np. t,y lub cos innego i 
program przechodzi dalej

oto moj program, nie czepiajcie sie ze duzo linijek ze mozna bylo 
prosciej..wiem..ale na razie nie jestem taki super jeszcze xD


program statystyka;

uses     crt;
var    k:longint;
         a:array[1..5]of real;

begin
    repeat
        k:k+1;
        clrscr;
        write('Wpisz cyfre i zatwierdz Enterem');
        readln(a[k]);
    until k=5;
    clrscr;
    (...)

prosze o zaznaczenie pogrybionym kolorem z góry dzieki xD
Program licz srednia ,sume, wariancje, odchylenie i inne f. statystyczne to 
jest wycinek programy, jak widac mozna tylko 5 cyfr wpisac...a jak zrobic wy 
bylo tyle ile sie chce?




Użytkownik "Terrmit" <terrmitv@poczta.onet.pl> napisał w wiadomości 
news:gg1fq2$6v3$1@achot.icm.edu.pl...
> mat17a@op.pl pisze:
>> witajcie
>>
>> aby zdefiniowac tablice należ wpisac
>> a:array[1..5]of integer
>>
>> ale jak napisac tablice o niewiadomej liczbie elementów(uzytkownik 
>> okresla, wpisujac liczby)?
>> jak napisac takie cos ze uzytkownik wpisuje liczby i jest pytany po 
>> kazdej czy wprowadzic kolejna liczbe[tak/nie]
>> ja umiem tak zrobic ale tylko dla z góry ustalonej tablicy np 
>> array[1..5].
>> pomóżcie
>>
> Zapoznaj się z tablicami dynamicznymi,
> google znajdą Ci mnóstwo informacji.
>
> Sławek