Turbo pascal króciutki programik.

[BerQ]

Witam. Ostatnio byłem chory i niestety nie potrafię rozwiązać zadania domowego z powodu nieobecności.
Program dla Was jest pewnie dosyć prosty, ja dopiero zaczynam swoją przygodę z Pascalem (1kl. Tech inf).
A oto jego treść:

Kod: Zaznacz cały

Napisz program, który wypisze na ekranie monitora 10 dowolnych liczb całkowitych z przedziału od 10 do 20 losowo wybranych przez komputer.

Bardzo liczę na szybką pomoc, ponieważ zadanie mam na jutro. Pozdrawiam.

[Lena]

w pętli for 10 razy wypisz polecenie 10+Random(21);
na początku programu daj Randomize - generator liczb losowych

[BerQ]

Kod: Zaznacz cały

program program;
uses crt;
var liczba,i:integer;
tab:array[1..10] of integer;
begin
Randomize;
for i:=1 to 10 do
begin
liczba:=(random(10)+10);
tab[i]:=liczba;
write('~',liczba);
end;
readln;
end.

Dziękuje za nakierowanie.Temat do zamknięcia.