Практикалық жұмыс №1 Тақырыбы: ет кабинетіндегі техника қауіпсіздігі Теорияға шолу Техника қауіпсіздігі және есептеуіш техника кабинетіндегі тәртіп сақтау ережелері



бет33/43
Дата16.01.2024
өлшемі4.98 Mb.
#489189
түріПрограмма
1   ...   29   30   31   32   33   34   35   36   ...   43
Информатикадан практикалық сабақтар және есептер жинағы

program student;
var
a1: string [7]; a2: string [3];
a3: string [10]; a4: char;
b1,b6:integer; b2: string [10];
b3: string [3]; b4: string [4];
b5: string [11];
begin
writeln;
a1:=’студент’; a2:=’пін’;
a3:=’Мен’; a4:=’е’;
b1:=length(a1); {ұзындығын анықтау b1=7}
b2:=concat(a1,a2); { a1 және a2 –ні қосу}
b3:=copy(a1,4,3);{а1 тіркесінің 4-ші позицисынан 3 символды бөліп алу}
b4:=copy(a1,5,3); { а1 тіркесінің 5-ші позицисынан 3 символды бөліп алу }
b5:=concat(a3,a1); { a3 және a1 –діі қосу }
b6:=pos(a4,a1); {5}
write(‘сөз ұзындығы:’,b1,’’:2,b2,’’:2,b3,’’:2,b4);
writeln(b5,’’:2, b6);
end.
Практикалық жұмыс №24
Тақырыбы: Массивтер (жиымдар). Бір өлшемді массивтер


Теорияға шолу
Жиым-бұл бір атаумен (жиым идентификаторы) белгіленіп біріктірілген біртекті элементтер жиыны. Жиымдардың негізгі параметрлерінеоныңтипі (сандық,символдық,логикалық), өлшемі (бірөлшемді,екіөлшемді т.с.с) және көлемі (жиымдардың әрбір өлшемдегі элементтерінің саны) жатады.
Жиымды сипаттау үшін array ofсөз тіркесі қолданылады.
Оның жазылу пішімі:
type <тип аты> = array[<индекс типі>] of <элемент типі>;
var <идентификатор, ...> : <тип аты>;
мұндағы array (жиым),of (-дан,-ден,-тан,-тен)-түйінді сөздер;
[<индекс типі>]-real,integer базалық типтерінен өзге кез келген стандартты тип, яғни индекстің типі ретінде шектеулі саналатын, логикалық және литерлік типтер пайданылады; <элемент типі> - құраушылар (элементтер) типі, яғни Паскаль тілінде пайдалануға болатын жиым элементтерінің типі.
Жиым элементтеріне қол жеткізу үшін оның индексі пайдаланылады. Индекс элементтің қай жерде тұрғанын анықтайды. Индекс өрнек, айнымалы немесе тұрақты түрінде берілуі мүмкін.
Жиым типтер бөлігінде көрсетілмей, бірден айнымалылар бөлігінде былай да анықтала береді:


Достарыңызбен бөлісу:
1   ...   29   30   31   32   33   34   35   36   ...   43




©dereksiz.org 2024
әкімшілігінің қараңыз

    Басты бет