Informatyka i języki programowania

Logistyka, semestr III

Studia stacjonarne 1 stopnia

Zestaw 5

Temat:

Instrukcja pętli o nieokreślonej liczbie iteracji (powtórzeń) DO … LOOP, wyświetlenie wyników w liście, metoda AddItem.

1. Napisać program, w którym wczytać (funkcja InputBox()) ciąg liczb rzeczywistych zakończony liczbą 0, która do ciągu nie należy. Wczytane liczby wyświetlić w liście Lst1. Obliczyć i wyświetlić w etykiecie Lbl1 ilość i sumę liczb ciągu.

2. Napisać program, w którym wczytać (funkcja InputBox()) ciąg liczb rzeczywistych zakończony liczbą 0, która do ciągu nie należy. Wczytane liczby wyświetlić w trzech listach:

- w pierwszej Lst1 wszystkie liczby,

- w drugiej Lst2 liczby dodatnie,

- w trzeciej Lst3 liczby ujemne.

W etykietach pod listami wyświetlić sumę i liczbę elementów znajdujących się w odpowiedniej liście.

W etykiecie pod listą Lst1 dodatkowo wyświetlić wartość największej liczby ciągu. Wyświetlić komunikat (MsgBox()) jakich liczb (dodatnich lub ujemnych) jest w ciągu więcej.

3. Napisać program, w którym wczytać (funkcja InputBox()) liczbę całkowitą k oraz ciąg liczb rzeczywistych zakończony liczbą 0, która do ciągu nie należy. Obliczyć i wyświetlić:

- w etykiecie Lbl1 ilość, sumę oraz średnią arytmetyczną liczb większych od k,

- w etykiecie Lbl2 ilość, sumę oraz średnią arytmetyczną liczb mniejszych od k, w etykiecie Lbl1 ilość oraz sumę liczb równych k.

4. Napisać program, w którym wczytać liczbę całkowitą q oraz ciąg liczb całkowitych zakończony liczbą 0 (zero do ciągu nie należy). Elementy wczytanego ciągu wyświetlić w liście Lst1. Dodatkowo w oknie Immediate wyświetlić liczby dodatnie podzielne przez q oraz ich sumę narastająco.

Na przykład: dla wprowadzonej liczby q = 7 oraz ciągu liczb: 5, 14, -7, 49, 12, 7, 0 oraz program powinien wyświetlić oknie Immediate następujące wyniki:

14

14

49

63

7

70

5. Napisać program, w którym wczytać ciąg znaków zakończony "." (znak "." do ciągu nie należy). Wyświetlić wszystkie znaki ciągu. Policzyć i wyświetlić

− ilość wszystkich znaków w ciągu;

− ilość znaków spacji w ciągu;

− ilość znaków ”,” ”;” łącznie;

6. Wpłacamy do banku kwotę X. Oprocentowanie wynosi P procent w skali rocznej. Napisać program, który dla danych X, P obliczy po ilu latach wartość wkładu zostanie podwojona. W liście Lstwynik wyświetlić wyniki pośrednie, tzn. wartość wkładu w każdym następnym roku. Obliczenie zakończyć w momencie podwojenia kwoty X wkładu.

7. Napisać program, w którym obliczyć ile (najmniejsza wartość) trzeba dodać kolejnych liczb naturalnych, by ich suma przekroczyła pewną wartość dodatnią a, podaną przez użytkownika.

8. Napisać program, w którym obliczyć ile dzielników nietrywialnych naturalnych posiada zadana liczba naturalna n, podana przez użytkownika.