Mam zadanie na programowanie strukturalne i obiektowe.Napisałem program.----------------------------------------program hotel;usescrt;typeTrozmiar = (ogromny, duzy, sredni, maly);Trodzaj = (vip, zwykly);Twyposazenie = array[1..10] of String[30];TPokoj = recordLazienka : String[3];Sniadanie : String[30];Obiad : String[30];Kolacja : String[30]Rozmiar : Trozmiar;Rodzaj : Trodzaj;Lozko : String[15];Ilosc : String[2];DodatkoweWyposazenie : Twyposazenie;end;varPokoj : TPokojZnak : Char;i : Byte;Wyposazenie : String[30];beginClrScr;write('Czy w wyposazeniu ma byc lazienka? (TAK/NIE): '); readln(Pokoj.Lazienka);repeatwrite('Podaj rodzaj pokoju("v" - vip, "z" - zwykly): ');readln(Znak);until(UpCase(Znak) in ['v', 'z']);case UpCase(Znak) of'v' : Pokoj.Rodzaj := vip;'z' : Pokoj.Rodzaj := zwykly;end;repeatwriteln('Podaj rozmiar pokoju ("o" - ogromny, "d" - duzy, "s" - sredni, "m" - maly.');readln(Znak);until (UpCase(Znak) in ['o', 'd', 's', 'm']);case UpCase(Znak) of'o' : Pokoj.Rozmiar := ogromny;'d' : Pokoj.Rozmiar := duzy;'s' : Pokoj.Rozmiar := sredni;'m' : Pokoj.Rozmiar := maly;end;write('Co zyczysz sobie na sniadanie?: '); readln(Pokoj.Sniadanie);write('Co zyczysz sobie na obiad?: ' ); readln(Pokoj.Obiad);write('Co zyczysz sobie na kolacje?: '); readln(Pokoj.Kolacja);write('Ilu osobowe lozka chcesz miec w pokoju(1/2)?: '); readln(Pokoj.Lozko);write('Ile lozek chcesz miec w pokoju?(cyfra): '); readln(Pokoj.Ilosc);i :=1;repeatwrite('Podaj kolejne dodatkowe wyposazenie pokoju (Enter - Koniec): ');readln(Wyposazenie);Pokoj.DodatkoweWyposazenie[i] := Wyposazenie; Inc(i);until (i>10) or (Wyposazenie='');ClrScrwith Pokoj dobeginwriteln(Lazienka, ', ', Rodzaj, ', ', Rozmiar);writeln('Sniadanie: ',Sniadanie, ', Obiad: ',Obiad, 'Kolacja: ',Kolacja);case Rodzaj ofvip : write('Pokoj vip');zwykly : write('Pokoj zwykly');end;case Rozmiar ofogromny : writeln(' ogromny');duzy : writeln(' duzy');sredni : writeln(' sredni');maly : writeln(' maly');end;for i := 1 to 10 doif (DodatkoweWyposazenie[i] <> '') thenwriteln(' - ', DodatkoweWyposazenie[i];end;readlnend.---------------------------------------------------FPC pokazuje mi błąd.Prosiłbym o szybką pomoc, ponieważ jest mi to potrzebne na najbliższą lekcję w środę na zaliczenie. :)Jeśli trzeba proszę nanieść zmiany tak aby program zadziałał.Polecenie zadania brzmi: Napisz program, który wczyta dane dotyczące hotelu do zmiennej typu rekordowego, a następnie wydrukuje jego "metryczkę".
Answer
Mam do rozwiązania kilkanaście zadań na zaliczenie. Prosiłbym o dokładne rozwiązanie bo być może będe musiał to potem na tablicy rozpisać. Pilne ;) 1. Narysuj wykres funkcji określonej wzorem / 2x+4 dla x<0 f(x) 4 dla 0≤ x < 4 \ -4x+20 dla x≥4 2.funkcja (f) której dziedziną jest zbiór liczb całkowitych określona jest wzorem f(x)=ax + b gdzie a ≠ 0 i b ≠ 0 oraz za pomocą tabeli częściowej f |-2| 1| f(x)|4 | 1| A= (a/b;-5a/b) 3. Funkcje liniowe f i g są określone wzorami f(x)=(m+3)x-1 g(x)=4x+(m-1) Obydwie funkcje mają to samo miejsce zerowe. Znajdź współczynnik kierunkowy funkcji f. 4. Współczynnik kierunkowy funkcji liniowej f jest równy 2. Wykres tej funkcji przecina oś OY w punkcie (0,10). Podaj wzór funkcji 5. Wyznacz miejsce zerowe funkcji. Narysuj jej wykres w układzie współrzędnych. 6. Wyznacz współrzędne punktów w których wykres funkcji równy f(x) = 2x - 5 przecina osie układu współrzędnych. Sprawdź czy punkt (1,-1) należy do wykresu funkcji. 7. Napisz wzrór funkcji liniowej której wykres jest równoległu do wykresu f(x) = -2x + 1 i zawiera punkt (-2,3) 8. Dane są funkcje f i g określone wzorami f(x) = 1/2x + 2 g(x)= -x - 1 Sporządź wykresy tych funkcji w jednym układzie współrzędnych. Dla jakiego argumentu funkcje mają tę samą wartość ? Wyznacz tę wartość. Dla jakich argumentów funkcja f przyjmuje wartości nie mniejsze niż funkcja g. 9.Funkcja f określona jest wzorem f(x) = -2x+4. Wyznacz przedział w którym wartości funkcji są ujemne. 10. Wyznacz m dla którego funkcja f(x) = (3m+9)x + 5m - 1 jest malejąca. 11. Wyznacz funkcję której wykład jest prostopadły do wykresu i przechodzi przez punkt (0,1). 12. Dana jest funkcja f(x)=(3m-1)x-7. Wyznacz parametr m tak, aby liczba x= -3 była miejscem zerowym funkcji. 13. Wyznacz współczynnik kierunkowy funkcji f, która przechodzi przez punkty A=(-2,3) B=(1,4)
Answer

Life Enjoy

" Life is not a problem to be solved but a reality to be experienced! "

Get in touch

Social

© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.