3582324408

ZiMl

W oznaczonych { ... } rriejscadi programu wpisz, jakie wartości będą nriały znrienne x, y, z.

program egzamin; var x_ry_rz : Word;

koniec : Boolean;

funetion jeden (a: Word; var b: Word): Word;

var c:Word;

b*g±n

a:=a+b; c:=bfl; b:=c+a; jeden:=b-c;

*nd;

pMMdure dwa(var a_fb_rc:Word); b*g±n

włiile c>a do begln

a: =a-l; b: =a-b; c: =c-b; end;

*nd;

procedur* trzy(var a_rb_rc:Word); b*gln

Repeat

koniec :=a>c; a:=a+l; c:=c-l; b: =c+a; until koniec;

•nd;

b*gin

x:=4;    y:=2;    z:=l;

x:«=jeden(y_r z);    {    z    =    ...    y    =    ....    z =

... }

x: =10; y: =8; z: =15;

dwa (x_r y_f z);    {    x    =    ...    y    b    ...    ze

... }

x:=2; y:=7; z: =3;

trzy (x_r y_r z);    {    x    <=    ...    y    =    ...    z =

... >

mrtA.

Zadania

Napisz dąg instrukcji, który realizuje następujące zadanie:

W zależności od wartości zmiennej a typu Byte, należy obliczyć wartość zmiennej b (typu Byte), według następujących zasad:

Jeżeli a jest z zakresu od 3 do 5    o b«i

Jeżeli a jest z zakresu od 7 do 70    co b»2

Jeżeli a jest większe od 70    o b-3

Zadanie należy zrealizować przy wykorzystaniu

a)    instrukcji warunkowej If,

b)    instrukcji wyboru cm*.

Zadani*

Napisz definicję funkcji umożliwiającej wprowadzenie z klawiatury odległości d oraz wartości kąta afgrad], a zwracającej wartość

dx =dxcos(a).

Zadani*

Napisz definicję procedury, której zadaniem jest zapisanie do pliku tekstowego wyniki .bet

wartości zmiennej A, gdzie var A :Array[l. .10] of Byt*;

Wszystkie elementy należy zapisać w jednym wierszu pliku tekstowego. Zadani*

W pliku tekstowym A bet znajduje się wykaz punktów geodezyjnych, składający się z numeru punktu (typu \Aford) oraz jego opisu (max. 15 znaków). W jednym wierszu pliku A.bct zapisane sądane dotyczące jednego punktu, np.

33    PunktlUasy

52    PurAt poligonowy

Ud ...

W pliku tekstowym B.txt zamieszczono wykaz współrzędnych punktów. W jednym wierszu tego pliku znajduje się numer punktu oraz współrzędne X, Y np.

U    20.345    30.567

33    10.456    67.888

Ud ...

Napisz program, w którym trzy procedury realizują następujące zadania:

1.    Procedura ]*d*n wybiera z plików A bet i B.bct punkty, których numery występują w obydwu plikach oraz zapisuje je do tablicy rekordów.

2.    Procedura dwa sortuje wybrane punkty w kolejności od najmniejszego do największego (wg numerów).

3.    Procedura Iny zapisuje wybrane i posortowane punkty w pliku zdefiniowanym C,

ftjnkty maga następującą strukturę:

Punkt = x*ooxd

Kr : Word;

X,Y : Real; opis : Strlng[15J; and;

Oraz

1.    Fódąj przykład deklaracji literału zmiennego

2.    Fbdaj przykład definicji typu tablicowego

3.    Wyjaśnij znaczenie funkcji lOResult

4.    Do czego służą zmienne indeksowane

5.    Fódąj przykład definicji typu zbiorowego

6.    Fódąj przykład deklaracji zmiennej typu wyliczeniowego

7.    Czy programista może zmieniać znaczenie identyfikatorów predefiniowanych.

8.    Wyjaśnij pojęcie : Dyrektywa parametryczna

9.    Czy poprawna jest nas trująca definicja typu:

Type x = Amty( -10.. 10] of Byte

10.    Fódąj przykład definicji zmiennej wskaźnikowej

11.    Wyjaśnij znaczenie procedury Rękasa

12.    Dane sąnastęzujące deklaracje:

typ* Wektor = Axx*y [1. .20] of Byt*;

v*r- a :    ''Byt*;

b : "Wektor;

c :    Array [1..20J of "Byt*;

Wpisz, jaki rozmiar pamięci zajmują zmienne a, b, c a —    b —    «s —

13.    Dana jest następująca macierz o 5 wierszach i 10 kolumnach:

	i	2	3	--	10
1	i	2	3		10
2	ii	12	13		20
a	41	42	43		50

Uzupełnij część wykonawcza programu j*d«n w taki sposób, aby utworzyć zmienne dynamiczne i wprowadzić do nich dane zamieszczone w powyższej tabeli

pxogx*ra geden; typ*

Wektor = Amy [1.. 10] of Int*g*r;

v»r	Macierz =	ftrray[1..5] of "Wektor;
	M	: Macierz;
b*gln	i. 3, *	: Irxt*g*r;
{...... mnd.