Zawartość
Nie podano
nie wiem czy ten temat jest w odpowiednim działe , jak nie to proszę o administratora o przeniesienie do odpowiedniego działu.
Mam problem z zadaniami które umieściłem poniżej
czy ktoś by mógł mi pomóc.
Zad 1.
Dane są następujące tabele Artykul i Dziennikarz:
[artykul]
id | tytuł | Wycena | kod_dz | kB
---+--------------------------------+----+------------+---------
1 | Wielkie Żarcie | 300 | BEKSA | 18.50
2 | Boso, ale w kapeluszu | 500 | REDD | 21.50
3 | WÅ‚adcy much | 600 | REDD | 24.02
4 | Myślenie owiec | 1500 | BEKSA | 17.40
5 | Prawda bez barier | 400 | BEKSA | 16.20
[dziennikarz]
kod_dz | imie | nazwisko | płeć
--------+--------+-----------+------
NOWAK | Jan | Nowak | M
BEKSA | Karol | Beksiński | M
KOWAL | Jakub | Kowalski | M
REDD | Carol | Redd | K
'id' jest kluczem głównym w tabeli artykul, 'kod_dz' jest kluczem obcym w tabeli Artykul i kluczem głównym w tabeli Dziennikarz.
A. Narysuj diagram związków encji opisujący powyższą sytuację.
B. Jaki jest charakter zwiÄ…zku Å‚Ä…czÄ…cego te tabele.
Zad 2.
Odwołujemy się do tabel z zad.1
Zapisz w SQL definicje tych tabel (CREATE).
Zad 3.
Posługując się strukturą tabel z zad. 2 skonstruuj zapytania SQL wykonujące polecenia opisane poniżej. Zapytania powinny zwracać poprawne wyniki bez względu na to jakie dane znajdują się w tabelach (tzn. nie mogą odwoływać się bezpośrednio do konkretnych danych).
A. Dodaj nowy artukuł Carol Redd o danych:
"Mit taniego franka", długość 20 kB, numer 18.
B. Zwieksz wartosc artykulow BEKSY o 100.
C. Wypisz dane Beksinskiego wraz z danymi o jego artykulach.
Dane uporzwac wedlug wartosci artykulow w kolejności malejącej.
D. Wypisz nazwiska dziennikarzy, którzy nie napisali żadnego artykułu.
E. Podaj długość najdłuższego artykułu napisanego przez kobietę.
F. Wypisz nazwiska dziennikarzy wraz ze srednia wartoscia ich artykulow.
Zad 4.
Odwołujemy się do treści tabel podaj w zad.1
Jaki wynik zwróci zapytanie
SELECT kod_dz, COUNT(*) AS liczba_artykułów FROM artykul GROUP BY kod_dz HAVING COUNT(*)>1
Jaki wynik zwróci zapytanie
SELECT tytuł,wartosc from artykul
WHERE wartosc > (SELECT avg(wartosc) FROM artykul)
Zad 5.
Dana jest następująca tabela wyników sportowych (zawodnicy identyfikowani są poprzez ich numery ID)
[zawodnik]
id_zaw | wynik | konkurencja
--------+-------+-------------------
1 | 13.0 | bieg przełajowy
2 | 9.2 | bieg przez płotki
3 | 11.5 | bieg przełajowy
4 | 9.0 | bieg przełajowy
5 | 10.0 | bieg 1500m
A. Jaki wynik zwróci zapytanie
SELECT SUM (wynik) FROM zawodnik WHERE konkurencja = 'bieg przełajowy'
B. Jaki wynik zwróci zapytanie
SELECT id_zaw FROM zawodnik
WHERE konkurencja = 'bieg przełajowy'
AND wynik > (SELECT AVG (wynik) FROM zawodnik)
C. Napisz instrukcję usuwającą wiersze wybrane w zapytaniu w części B zadania.
Moje tematy
nie moge znaleźć błędów w pascalu??
15 styczeń 2009 - 15:54
1. Ponizej znajduje sie kod pewnej funkcji w Pascalu. Popraw błedy (wsk: jest ich 5 i nie więcej niż jeden w linii). Uwaga: Wszystkie zmienne wystepujace w funkcji maja byc zmiennymi lokalnymi.
{1.} function z(x:integer)
{2.} var y:integer;
{3.} begin
{4.} y:=1;
{5.} for i:=1 to x {powinno być:for i:=1 to x do , tylko tutaj znalazłem}
{6.} y:=y*i;
{7.} if y mod 3=0 then z:= true;
{8.} else z:=false;
{9.} edn; {z}
2. Ponizej znajduje sie kod pewnej procedury w Pascalu. Popraw błedy. (wsk: jest ich 5 i nie więcej niż jeden w linii) Uwaga: Wszystkie zmienne wystepujace w procedurze maja byc zmiennymi lokalnymi.
{1.} procedure x(y:integer):integer;
{2.} var z:integer;
{3.} bgein
{4.} z:=1;
{5.} for j=y downto 1 do
{6.} z:=z*j;
{7.} writeln(’Procedura x, zmienna z:’z)
{8.} end; {x}
{1.} function z(x:integer)
{2.} var y:integer;
{3.} begin
{4.} y:=1;
{5.} for i:=1 to x {powinno być:for i:=1 to x do , tylko tutaj znalazłem}
{6.} y:=y*i;
{7.} if y mod 3=0 then z:= true;
{8.} else z:=false;
{9.} edn; {z}
2. Ponizej znajduje sie kod pewnej procedury w Pascalu. Popraw błedy. (wsk: jest ich 5 i nie więcej niż jeden w linii) Uwaga: Wszystkie zmienne wystepujace w procedurze maja byc zmiennymi lokalnymi.
{1.} procedure x(y:integer):integer;
{2.} var z:integer;
{3.} bgein
{4.} z:=1;
{5.} for j=y downto 1 do
{6.} z:=z*j;
{7.} writeln(’Procedura x, zmienna z:’z)
{8.} end; {x}
Bardzo proszÄ™ o pomoc w napisaniu tych 2 programow w pascalu
06 styczeń 2009 - 13:52
zadanie 1.bo nie wiem jak to zrobić
Dopisz do programu instrukcje wyświetlania wszystkich elementów tablicy, tak aby tablica przedstawiona została jako:
A. 3-wierszowa i 5-kolumnowa
B. 5-wierszowa i 3-kolumnowa
program tablica2;
var
i, j : integer;
tab : array[1..3,1..5] of integer;
begin
for i:=1 to 3 do
for j:=1 to 5 do
begin
write('Podaj tab[',i,',',j,']:=')
readln(tab[i,j])
end;
{Uzupelnij program...}
end.
zadanie 2.
1. Zadeklarowac tablice 20 liczb calkowitych
2. Wypelnic tablice losowo wybranymi liczbami z zakresu 0..5
3. Sprawdzic, z jaka czestotliwoscia pojawily sie kolejne liczby.
Wsk.
· na poczatku programu glownego wywolac procedure randomize, ktora uruchamia generator losowy
· funkcja random(Max+1) zwraca losowo wybrana liczbe calkowita z zakresu 0..Max
Dopisz do programu instrukcje wyświetlania wszystkich elementów tablicy, tak aby tablica przedstawiona została jako:
A. 3-wierszowa i 5-kolumnowa
B. 5-wierszowa i 3-kolumnowa
program tablica2;
var
i, j : integer;
tab : array[1..3,1..5] of integer;
begin
for i:=1 to 3 do
for j:=1 to 5 do
begin
write('Podaj tab[',i,',',j,']:=')
readln(tab[i,j])
end;
{Uzupelnij program...}
end.
zadanie 2.
1. Zadeklarowac tablice 20 liczb calkowitych
2. Wypelnic tablice losowo wybranymi liczbami z zakresu 0..5
3. Sprawdzic, z jaka czestotliwoscia pojawily sie kolejne liczby.
Wsk.
· na poczatku programu glownego wywolac procedure randomize, ktora uruchamia generator losowy
· funkcja random(Max+1) zwraca losowo wybrana liczbe calkowita z zakresu 0..Max
