Паскаль программалау тілі. Массивтер

Жоспары

1. Мәтiндердi шығару тәсiлдерi
2. Бiр өлшемдi массив
3. Массив элементтерiн iздеу және реттеу
        
        Паскаль программалау тілі(5)
Жоспары
1. Мәтiндердi шығару тәсiлдерi
2. Бiр өлшемдi массив
3. Массив элементтерiн iздеу және реттеу
Мәтiндердi ... ... ... ... ... ... үшiн төмендегi процедуралар
пайдаланылады.
OutTextXY(x, y, ‘Text’) – процедурасы, мұндағы (x, y) - ... ... Text- кез ... ... ... мен өлшемiн өзгертуге болады, ол ... ... ... асырылады.
SetTextStyle(F, D, CS)
мұндағы, F - текстiң шрифтi, D - бағыты, CS - ... D ... 0-ден ... ал CS ... 0-ден 10-ға дейiн өзгередi. Экранға жазылатын мәтiнге
де процедурасы арқылы қалауымыз ... кез ... түс ... ... ... пен шеңбер салып, олардың iшiне ... ... ... ... ... ... ... 0;
InitGraph
(GraphDriver,GraphMode,‘‘);
If GraphResult 0 then
Begin Writeln; ... ... ... ... 11); ... ... ... ‘эллипс’);
Setcolor(2); Circle(300, 350,70); Setfillstyle(1, 7); Floodfill(300,350,2);
Setcolor(9); Settextstyle(9,0,3); OuttextXY(280,350, ‘ШЕҢБЕР’);
Readln; Closegraph; end.
21. Массив
Бiр өлшемдi массив
Массив дегенiмiз ... ... ... бiр ... ... ... ... вектор, матрица осы массивке мысал бола
алады. Тiзбектiң айнымалылары массив элементтерi деп ... ... ... ... ажыратылады. Егер айнымалы бiр ... ... онда бiр ... массив болады. Олардың индекстерi
сандармен немесе белгiлi бiр әрiптермен жақша ... ... ... С(12), К(100)
Паскаль тiлiнде массивтiң ... ... тiк ... ... мысалы
1,6; 4,9; 5; 8,9; 0,47 –мәндерiнен тұратын А ... ... ... A[3]=5; ... A[5]=0,47
Егер есептеу барысында А1, А2, А3, … , А25 ... {Ai}, ... 2, 3, … 25 ... массив кездессе, онда оны программа барысында А[25]
түрiнде жазамыз.
Мұндағы А-массив аты болады да, ... ... ... ең ... ... есептеледi.
Паскаль тiлiнде массивтi программада қолдану үшiн алдымен оларды
мiндеттi түрде арнаулы ARRAY ... ... ...... арқылы сипаттап жазу керек.
Ол айнымалы - VAR немесе TYPE –тип бөлiгiнде ... VAR ... ... аты : ARRAY ... ... .. ... ... OF типi;
Мәселен алдыңғы мысалдағы А массивi үшiн:
VAR А : ARRAY [1 .. 5] OF ... А – ... аты, ... ... шама - REAL ... ... 1-ден 5-ке дейiн.
Массивтiң бүтiн, не нақты сандардан ... ... ... мысалдардан көрiп отырсыңдар. Сондай-ақ массив символдық типтен де
тұрады. Символдық жол – STRING үшiн массив келесi түрде өрнектеледi:
TYPE
STRING : АRRAY [0 .. 255] OF CHAR ... ... ... ... ... ... массив екенiн
байқауға болады. Алдыңғы мысалда STRING –массивi 255 ... ... ... ... ... ... ... тек сол мәндердi
ғана емес, басқа мәндердi де қабылдайтынын ... ... да көре ... Мәтіндегі латын әрiптерiн шығару:
VAR әрiп : ARRAY [‘A’ .. ‘Z’] OF ... ... бiр ... ... орташа температурасы:
TYPE құрылық =(Гаити, Таймыр, Ява, Тасмания Сицилия, Фемарн);
VAR T : ARRAY ... OF ... ... ... ... бойы ең ... aты =( ... Имаш, Ақын, Сара, Бақыт );
VAR Ж : ARRAY[ аты ] OF (ұл, ... : ARRAY [ аты ] OF 140 .. ... ... ... ... ... ... /қатесiз/ жазылуын келесi
түрде көрсетуге болады:
VAR M : ARRAY [1 .. N] OF ... : ARRAY ... .. ... ] OF ... : ARRAY [Жол] OF ... ARRAY [CHAR] OF ... бiрнеше массивтер бiр ыңғай типтi және элементтер саны тең
болса, онда оларды программада бiр ... ... ... ... A, B, C : ARRAY [1 .. 25] OF ... А, В, С – массивтерiнiң мәндерi 25 элементтен тұратын нақты сандар.
A[1], A[2], A[3], … , A[25],
B[1], B[2], B[3], … , ... C[2]], C[3], …, ... ... масивтер арасында “тең”, ”тең емес” немесе “
меншiктеу ...... ... ... Мысалы: егер А және В
массивi былай берiлсе,
VAR
A, B : ARRAY[1..10] OF ... үш ... ... ... ... ... ... ... = В ... әрбiр А массивi ... мәнi ... В |
| ... ... ... тең ... ... | Егер А ... ... ең ... бiр мәнi |
| ... В массивi элементiнiң мәнi тең болмаса. ... B | В ... ... ... мәнi ... массивi |
| ... мәнi ... |
| |В ... ... ... өзгерiссiз |
| ... ... ... ... мен оны одан шығару үшiн ... ... I:=1 TO 9 ... жол тоғыз элементтен тұратын А – ... ... ал ... I:=1 TO 9 ... ... ... массивтi шығарады.
Массив элементтерiн iздеу және реттеу
Мысал. 25 саннан тұратын ... ... ... ... ... ... табу ... MATRIX_2;
CONST N=25;
VAR
I, S, R : INTEGER;
A: ARRAY [1..N] OF ... I: = 1TO N ... ... ... ’ );
READ (A [I]);
END;
WRITE(‘iздейтiн санды енгiзiңiз’);
READ(S);
R: =0;
FOR I: = 1TO N ... A [I] = R ... ... ... ... ... ... WRITELN( ‘S–саны массивте бар’,R,’рет ’ )
ELSE WRITELN(‘S саны ... ... ... ... ... ... бар. ... iшiнен қою
және таңдау әдiстерiн қарастырайық. Қою әдiсiнiң орындалу ... ... ... ... және ... ... массив
бөлiгiнен бiртiндеп элементтер ретiмен таңдалып, реттерi бұзылмастан келесi
реттелген массив жағына қойылады. Массивтi ... ... ... ... 1-шi ... қана алынады, ал қалғандары реттелмеген бөлiкке
жататын болады. ... ... ... ... элемент басқа айнымалыға меншiктелiп,
сақталады;
- оны ... орын ... ретi ... ... ... ... ... таңдалған элемент қойылады.
PROGRAM INSERTIONSOFT;
USES CRT;
CONST N = 20;
TYPE A = ARRAY [1..N] OF REAL;
VAR A: ... ... J, K = ... ... ... элементтерiн енгiз ‘);
FOR I: = 1 TO N DO READ (A[ I ]);
READLN;
FOR I: =2 TO N ... A[ I ]; J:= ... ... DO
J= J + 1;
FOR K:=I-1 DOWNTO J DO
A[K+1]:= A[K];
A[J]:=B;
END.
Кескiнi:
1 2 3 4 5 ... | 1 | 9 | 2 | 5 | 7 |
1 2 3 4 5 ... | 3 | 9 | 2 | 5 | 7 |
| 9 |
1 2 3 4 5 ... | 3 | 9 | 2 | 5 | 7 |
1 2 3 4 5 ... | 2 | 3 | 9 | 5 | 7 |
1 2 3 4 5 ... | 2 | 3 | 5 | 9 | 7 ... 2 3 4 5 ... | 2 | 3 | 5 | 7 | 9 ... ... CRT;
CONST N=20; ... ... ... [1..N] OF ... : ... : REAL ... s :INTEGER ... (‘массив элементтерiн енгiз: ’ ) ;
FOR I : =1 TO N ... (Vector [ I] ); ... S : = 1 TO N-1 ... кiшi ... ... ... = Vector[S];
IMIN:= S;
FOR I : = S+1 TO N DO
IF Vector [i] < MIN THEN ... : = ... i;
{ S –шi және ең кiшi ... ... ... ... [S];
Vector [S]: = IMIN
END;
FOR I : =1 TO N ...... ... ... , Vector ... ;
END.
-----------------------
шеңбер
Эллипс
1
1
2
3
4
2
5
5
7

Пән: Информатика
Жұмыс түрі: Материал
Көлемі: 7 бет
Бұл жұмыстың бағасы: 200 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
Массив элементтерін сорттау21 бет
Турбо Паскальда тест дайындау10 бет
Құрыдымдық типтер.жиындар19 бет
Turbo Pascal 7.0 интегралдық программалау ортасын пайдалану43 бет
Turbo Pascal жүйесінде массивтерді ұйымдастыру технологиясы39 бет
Турбо паскальда екі өлшемді массивтерді ұйымдастыру технологиясы19 бет
Бір өлшемді массивтер12 бет
C++ екі өлшемді массивтер20 бет
Delphi бағдарламасындағы массивтер12 бет
Turbo Paskal-да символдық ақпаратты өңдеу19 бет


Исходниктер
Пәндер
Көмек / Помощь
Арайлым
Біз міндетті түрде жауап береміз!
Мы обязательно ответим!
Жіберу / Отправить


Зарабатывайте вместе с нами

Рахмет!
Хабарлама жіберілді. / Сообщение отправлено.

Сіз үшін аптасына 5 күн жұмыс істейміз.
Жұмыс уақыты 09:00 - 18:00

Мы работаем для Вас 5 дней в неделю.
Время работы 09:00 - 18:00

Email: info@stud.kz

Phone: 777 614 50 20
Жабу / Закрыть

Көмек / Помощь