Inf. dla 2A - L.45

Temat: Algorytmy iteracyjne w Pascal. Pętla while do.
Pętla while do jest używana w takiej postaci:

while (warunek_kontynuacji) do
        begin
        end;

Przykład wypisujący na ekranie liczby od 1 do wybranej przez użytkownika liczby (i - licznik, a - wybrana przez użytkownika liczba):

Program iteracyjny;
var i, a: integer;
begin
write('Wprowadź liczbę: ');
readln(a);
i:=1;
while (i<a) do
         begin
         write(i,'  ');
         i:=i+1;
         end;
readln;
end.

Zadanie 1: Napisz program, który odczytywałby wprowadzoną z klawiatury liczbę i wyprowadzałby tyle gwiazdek na ekranie, ile wynosi ta liczba.
Zadanie 2: Napisz program, który odczytywałby dwie liczby wprowadzone z klawiatury i wypisywałby na ekranie wszystkie liczby pomiędzy mniejszą z nich a większą. (na przykład wprowadzono 4 i 1, wtedy program wypisuje 1, 2, 3, 4)