Środowisko Turbo Pascal 7.0, operacje wprowadzania i wyprowadzania danych
Instrukcja pętli repeat until, wyboru case, rekordy i instrukcja with, tablice jednowymiarowe rekordow, pliki typu file of
Zadanie do wykonania:
Napisz program, ktory przetwarza tablice N rekordów zawierających następujące pola:
nazwisko (string[20]), tablice przechowującą 6 ocen z różnych przedmiotów (tablica elementów typu Real) oraz pole średnia.
Lan=string[20];
tab=arryay[1..6] of Real;
Osoba= record
Nazwisko: lan;
Oceny: tab;
Srednia: Real;
end;
tablica = array [1..N] of Osoba;
Program powinien zawierać następujące opcje
1. Wprowadzanie danych z klawiatury: nazwiska i 6 ocen do kolejnego elementu tablicy 2. Obliczanie średniej dla każdego wprowadzonego rekordu
3. Wyświetlanie tablicy
4. Wyszukanie maksymalnej średniej
5. Dopisywanie danych umieszczonych w tablicy do pliku w postaci binarnej 6. Wyświetlanie zawartość pliku binarnego na ekran
Uwagi:
wywołanie opcji należy wykonać za pomocą instrukcji wyboru case of
każdą z czynności należy wykonać w sekwencji instrukcji wyboru
powtórzenia wykonania czynności w opcjach sekwencji wyboru należy wykonać za pomocą instrukcji repeat until. Warunek zakończenia tej instrukcji powinien dotyczyć naciśnięcia np. klawisza ESC.