Ia tidak akan mengejutkan sesiapa sahaja bahawa hari ini populariti, permintaan dan permintaan untuk peranti seperti loji kuasa dan penjana arus ulang-alik agak tinggi. Ini dijelaskan, pertama sekali, oleh fakta bahawa peralatan penjanaan moden adalah sangat penting untuk penduduk kita. Di samping itu, adalah perlu untuk menambah bahawa penjana arus ulang-alik telah menemui aplikasi luas mereka dalam pelbagai bidang dan kawasan. Penjana industri boleh dipasang di tempat-tempat seperti klinik dan tadika, hospital dan pertubuhan katering, gudang peti sejuk beku dan banyak tempat lain yang memerlukan bekalan arus elektrik yang berterusan. Sila ambil perhatian bahawa kekurangan bekalan elektrik di hospital secara langsung boleh menyebabkan kematian seseorang. Itulah sebabnya penjana mesti dipasang di tempat-tempat tersebut. Juga agak biasa ialah penggunaan alternator dan loji kuasa di tapak pembinaan. Ini membolehkan pembina menggunakan peralatan yang mereka perlukan walaupun di kawasan yang tiada bekalan elektrik sama sekali. Namun, perkara itu tidak terhenti setakat itu sahaja. Loji janakuasa dan set penjana telah dipertingkatkan lagi. Akibatnya, kami ditawarkan penjana arus ulang alik isi rumah, yang boleh dipasang dengan jayanya untuk kotej elektrik dan rumah desa. Oleh itu, kita boleh membuat kesimpulan bahawa alternator moden mempunyai pelbagai aplikasi yang agak luas. Di samping itu, mereka dapat menyelesaikan sejumlah besar masalah penting yang berkaitan dengan operasi rangkaian elektrik yang salah atau ketiadaannya.

Pengaturcaraan dalam Pascal

Pada tahun 1970, sekurang-kurangnya dua peristiwa besar berlaku dalam dunia pengaturcaraan - sistem pengendalian UNIX dan bahasa pengaturcaraan baru yang dicipta oleh Profesor Niklaus Wirth dari Institut Teknologi Persekutuan Switzerland di Zurich muncul. Wirth menamakannya sebagai penghormatan kepada ahli matematik dan ahli falsafah Perancis abad ke-17 yang hebat, Blaise Pascal.

Niklaus Wirth

Blaise Pascal

bahasa Pascal sesuai untuk latihan pengaturcaraan awal, bukan sahaja

kerana ia mengajar cara menulis program dengan betul, tetapi juga cara dengan betul

membangunkan kaedah untuk menyelesaikan masalah pengaturcaraan

• huruf besar dan huruf kecil abjad Latin dari A hingga z, serta garis bawah (_), yang juga dikira sebagai huruf.
• Huruf besar dan huruf kecil boleh ditukar ganti (sama makna);
• angka Arab 0 1 2 3 4 5 6 7 8 9 ;
• watak tunggal khas: + – * / = . , : ; ^ $ # @ ;
• tanda berpasangan khas: () { } ;
• tanda majmuk: = .. (* *) (..) .

Struktur program

Program Pascal terdiri daripada:

// Tajuk (bahagian pilihan)

• Penerangan markah;
• Definisi pemalar;
• Definisi jenis;
• Penerangan pembolehubah;
• Penerangan mengenai prosedur dan fungsi.

• bermula { permulaan program }

• { badan program }

• tamat. { tamat program }

Struktur program

Program nama program; ( tajuk program }

Kegunaan …; (bahagian sambungan modul)

Label … ; { bahagian penerangan tag }

Const … ; { bahagian penerangan berterusan }

Toure … ; { bahagian definisi jenis }

Var … ; { bahagian penerangan berubah-ubah }

Fungsi … ; Prosedur … ; { bahagian yang menerangkan fungsi dan prosedur }

... { bahagian operator }

Apakah kandungan program ini?

berterusan – kuantiti tetap yang mempunyai nama.

Pembolehubah – kuantiti berubah yang mempunyai nama (sel memori).

Prosedur – algoritma tambahan yang menerangkan beberapa tindakan (melukis bulatan).

Fungsi – algoritma tambahan untuk melakukan pengiraan (mengira punca kuasa dua, dosa) .

Pemalar

i2 = 45; { integer }

pi = 3.14; { nombor sebenar }

q = " Vasya "; { rentetan aksara }

L = Benar; { nilai logik }

bahagian integer dan pecahan dipisahkan oleh titik

Anda boleh menggunakan huruf Rusia!

boleh membawa dua maksud:

• Betul (benar, “ya”) Salah (salah, “tidak”)
• Benar (kebenaran, “ya”)
• Salah (salah, “tidak”)

Pembolehubah

Jenis pembolehubah:

• integer ( keseluruhan ) sebenar ( sebenar ) char ( satu watak ) tali ( rentetan aksara ) boolean ( logik }
• integer ( keseluruhan }
• sebenar ( sebenar }
• char( satu watak }
• tali ( rentetan aksara }
• boolean ( logik }

Mengisytiharkan Pembolehubah ( peruntukan ingatan ) :

pembolehubah– pembolehubah

jenis - integer

var a, b, c: integer ;

senarai nama pembolehubah

Contoh program

tulis(' Ini adalah program pertama saya ! ’);

Jalankan program dan lihat hasilnya.

Operator inferens

Tulis (' teks ’); - operator untuk memaparkan teks dan pembolehubah pada skrin (meninggalkan kursor pada baris semasa);

Writeln(' teks ’); - operator untuk memaparkan teks dan pembolehubah pada skrin (menggerakkan kursor ke baris baharu);

Senaman

• Paparkan teks berikut pada skrin:

Hai semua!

Saya adalah pengaturcara terbaik di SSH No. 3!

Sila ambil perhatian bahawa teks dipaparkan pada dua baris yang berbeza.

Kira ungkapan matematik dalam ABC Pascal

• Keutamaan operasi di ABC Pascal sama seperti dalam matematik.
• Anda hanya perlu belajar cara menulis ungkapan matematik dalam bahasa dengan betul Pascal

Operasi aritmetik

Operasi

Nama

Penambahan

Penolakan

Pendaraban

Bahagian (jenis sebenar sahaja)

A div B

Pengiraan bahagian integer (bilangan tidak lengkap)

Mengira baki

Kira:

10 div 3 18 mod 4

Contoh

Matematik rekod

Rakaman dalam bahasa Pascal

37(25+87,5)-17(4,6+1,9)

37*(25+87.5)-17*(4.6+1.9)

(a +2* b-3*c)/(5*a+4)

(a+b)/(a-b)+a*b/3.14

Titik perpuluhan masuk Pascal dilambangkan dengan titik

Ciri-ciri Standard

Fungsi Pascal

tatatanda matematik

Nama

Nilai mutlak nombor X (modulus)

Menduakan nombor

Pempamer

Mengira punca kuasa dua

Mengira bahagian pecahan suatu nombor

Bundarkan kepada nombor bulat terdekat

Memotong bahagian pecahan

takrifkan keputusan:

Frac(16.68); Pusingan(16.68); Trunc(16.68);

Ciri-ciri Standard

Fungsi Pascal

tatatanda matematik

Nama

Pengiraan sinus

Pengiraan kosinus

Bahagian integer nombor

Mengira logaritma asli

Menaikkan nombor kepada kuasa

Mengembalikan nombor rawak dalam julat dari 0 hingga X

Nombor π

Ijazah dalam Pascal perlu ditukar kepada radian

Rakaman dalam bahasa Pascal

tatatanda matematik

Operator PL Pascal ABC

:= ungkapan; Ungkapan aritmetik boleh termasuk pemalar nama pembolehubah operasi aritmetik tanda: pemalar nama pembolehubah operasi aritmetik tanda: + - * / div mod + - * / div mod fungsi memanggil kurungan () fungsi memanggil kurungan () bahagian integer pendaraban baki pembahagian" lebar ="640"

Pengendali tugasan

nama pembolehubah := ungkapan ;

Ungkapan aritmetik mungkin termasuk

• pemalar nama pembolehubah tanda operasi aritmetik:
• pemalar
• nama berubah-ubah
• tanda-tanda operasi aritmetik:

+ - * / mod div

• + - * / mod div

• fungsi memanggil kurungan ()
• panggilan fungsi
• kurungan bulat ()

pembahagian lengkap

pendaraban

baki bahagian

Pengendali mana yang tidak betul?

program qq;

var a, b: integer;

x, y: sebenar;

10 := x;

y:= 7 , 8;

b:= 2.5;

x:= 2*(a + y);

a:= b + x;

nama pembolehubah mestilah di sebelah kiri tanda :=

bahagian integer dan pecahan diasingkan titik

Anda tidak boleh menulis nilai sebenar kepada pembolehubah integer

Operator input

baca(a); { memasukkan nilai pembolehubah a)

baca (a, b); { memasukkan nilai pembolehubah a Dan b)

Bagaimana untuk memasukkan dua nombor?

dipisahkan oleh ruang:

melalui Masuk :

Operator inferens

tulis satu); { nilai pembolehubah keluaran a)

menulis ln (a); { nilai pembolehubah keluaran a Dan beralih ke baris baru }

writeln(" hello! "); { output teks }

writeln(" Jawapan: ", c); { teks keluaran dan nilai berubah c)

writeln(a, "+", b, "=", c);

Menambah dua nombor

Tugasan. Masukkan dua integer dan paparkan jumlahnya.

Penyelesaian paling mudah:

program qq;

var a, b, c: integer;

baca (a, b);

c:= a + b;

writeln(c);

Penyelesaian lengkap

program qq;

var a, b, c: integer;

writeln(" Masukkan dua integer ");

baca (a, b);

c:= a + b;

writeln(a, "+", b, "=", c);

komputer

Protokol :

Masukkan dua integer

25+30=55

pengguna

KIRA:

12 div 4 =

1 9 div 5 =

12 mod 3 =

1 36 mod 10 =

Pada Pascal

Dalam bahasa matematik

Modulus nombor x

Kuadrat x

Trunc(x)

e X

Pusingan(x)

Pengiraan bahagian pecahan

Punca kuasa dua bagi x

Bundarkan kepada nombor bulat terdekat

Rawak(x)

Memotong bahagian pecahan

sinus x

Tamat/y*ln(x))

Mengembalikan nombor rawak daripada 0 kepada x

Kosinus x

[ X ]



X di

Ln x

Kerja rumah

1. Hitung lilitan dan luas bulatan pada jejari tertentu

2. Kira perimeter segi tiga tepat dari kakinya

Operator bersyarat ( bentuk penuh )

bentuk penuh percabangan

syarat

Tindakan1

Tindakan2

kesimpulan

kemudian mulakan (apa yang perlu dilakukan jika keadaan itu benar) tamatkan lain mulakan (apa yang perlu dilakukan jika syarat itu salah) tamat; Ciri-ciri: koma bertitik TIDAK diletakkan sebelum lain bermula dan berakhir koma bertitik TIDAK diletakkan sebelum lain jika terdapat satu pernyataan dalam blok, anda boleh mengalih keluar perkataan bermula dan tamat" width="640"

Operator bersyarat (bentuk panjang)

jika syarat kemudian bermula

{ }

lain bermula

{ apa yang perlu dilakukan jika syarat itu palsu }

Keanehan:

• sebelum ini lain TIDAK letakkan koma bertitik jika terdapat satu pernyataan dalam blok, anda boleh mengeluarkan perkataan bermula Dan tamat
• sebelum ini lain TIDAK koma bertitik ditambah
• jika terdapat satu pernyataan dalam blok, anda boleh mengalih keluar perkataan bermula Dan tamat

Operator bersyarat (bukan bentuk penuh )

borang percabangan yang tidak lengkap

syarat

Tindakan

kesimpulan

kemudian mula (apa yang perlu dilakukan jika keadaan itu benar) tamat; Ciri-ciri: jika terdapat satu pernyataan dalam blok, anda boleh mengalih keluar perkataan bermula dan tamat; jika terdapat satu pernyataan dalam blok, anda boleh mengalih keluar perkataan bermula dan tamat" width="640"

Operator bersyarat (borang tidak lengkap)

jika syarat kemudian bermula

{ apa yang perlu dilakukan jika syarat itu benar }

Keanehan:

• jika terdapat satu pernyataan dalam blok, anda boleh mengalih keluar perkataan bermula Dan tamat
• jika terdapat satu pernyataan dalam blok, anda boleh mengalih keluar perkataan bermula Dan tamat

Kerja rumah

• Tulis program yang mengurangkan nombor pertama dengan faktor lima jika ia lebih besar daripada yang kedua.

2. Tulis satu atur cara di mana nilai pembolehubah Dengan dikira dengan formula: a+b , Jika A ganjil Dan a*b , Jika A malah .

b kemudian c:= a + b else c:= b – a;" width="640"

Kerja rumah

1. Tulis program untuk menyelesaikan masalah:

A). Nilai x diketahui. Kira y jika

b). Koordinat titik diberikan. Ketahui sama ada titik ini terletak dalam kuadran koordinat ke-3?

2. Tentukan nilai pembolehubah c selepas melaksanakan serpihan program berikut:

a:= 6 ;

b:= 15 ;

a:= b – a*2;

jika a b maka

c:= a + b

lain c:= b – a;

Kitaran - Ini ialah pelaksanaan berulang bagi urutan tindakan yang sama.

• berbasikal dengan terkenal bilangan langkah ( gelung dengan parameter ) kitaran dengan tidak diketahui bilangan langkah ( gelung dengan keadaan )
• berbasikal dengan terkenal bilangan langkah ( gelung dengan parameter )
• berbasikal dengan tidak diketahui bilangan langkah ( gelung dengan keadaan )

:= nilai mula ke nilai akhir do begin (loop body) end; Mengurangkan pembolehubah sebanyak 1 (langkah -1): untuk pembolehubah:= nilai awal ke nilai akhir mulakan (badan gelung) hujung;" width="640"

Tambah pembolehubah sebanyak 1 (langkah 1):

untuk pembolehubah := nilai awal kepada

nilai akhir buat bermula

{ badan gelung }

Menurunkan pembolehubah sebanyak 1 (langkah 1) :

untuk pembolehubah := nilai awal turun ke

nilai akhir buat bermula

{ badan gelung }

Keanehan:

• integer ) kepada ) atau -1 ( turun ke ) bermula Dan tamat anda tidak perlu menulis: kepada ) tidak pernah dilaksanakan (
• pembolehubah gelung hanya boleh menjadi integer ( integer )
• langkah perubahan pembolehubah gelung sentiasa 1 ( kepada ) atau -1 ( turun ke )
• jika terdapat hanya satu pernyataan dalam badan gelung, perkataan bermula Dan tamat anda tidak perlu menulis:
• jika nilai akhir kurang daripada nilai awal, gelung ( kepada ) tidak pernah dilaksanakan ( menyemak keadaan pada permulaan gelung, gelung dengan prasyarat)

untuk saya:= 1 ke 8 buat

writeln( " Hello " );

• Ia tidak dibenarkan menukar pembolehubah gelung dalam badan gelung
• apabila menukar nilai mula dan tamat di dalam gelung, bilangan langkah tidak akan berubah:

untuk saya:= 1 kepada n mulakan

writeln( " Hello " );

n:= n + 1;

tiada gelung

mulakan (badan gelung) tamat; Ciri-ciri: anda boleh menggunakan keadaan kompleks: jika terdapat hanya satu operator dalam badan gelung, perkataan bermula dan tamat tidak perlu ditulis: anda boleh menggunakan syarat kompleks: jika terdapat hanya satu operator dalam badan gelung, perkataan bermula dan berakhir tidak perlu ditulis: while (a d o begin ( body loop ) end; while a d o a:= a + 1;" width="640"

sementara syarat buat bermula

{ badan gelung }

Keanehan:

• anda boleh menggunakan syarat yang kompleks: jika terdapat hanya satu operator dalam badan gelung, perkataan bermula Dan tamat anda tidak perlu menulis:
• Anda boleh menggunakan syarat yang kompleks:
• jika terdapat hanya satu pernyataan dalam badan gelung, perkataan bermula Dan tamat anda tidak perlu menulis:

sementara (a d o mulakan

{ badan gelung }

sementara a d o

a:= a + 1;

b d o a:= a – b; a:= 4; b:= 6; manakala a d o d:= a + b;" width="640"

• keadaan dikira semula setiap kali gelung dimasukkan
• jika keadaan di pintu masuk ke gelung adalah palsu, gelung tidak pernah dilaksanakan
• jika syarat tidak pernah menjadi palsu, program akan digelung

a:= 4; b:= 6;

sementara a b d o

a:= a – b;

a:= 4; b:= 6;

sementara a d o

d:= a + b;

sehingga keadaan " width="640"

Gelung dengan postcondition ialah gelung di mana ujian keadaan dilakukan pada penghujung gelung.

badan gelung

sehingga syarat

TUGASAN

Cari hasil tambah kuasa dua semua nombor asli dari 1 hingga 100. Mari selesaikan masalah ini menggunakan ketiga-tiga jenis gelung.

"Bye" .

Program qq;

var a, s: integer;

s:=s+a*a;

writeln(s);

100 ; writeln(s); hujung." lebar="640"

"Sebelum"

Program qq;

var a, s: integer;

s:=s+a*a;

sehingga 100 ;

writeln(s);

"Dengan parameter"

Program qq;

var a, s: integer;

untuk:=1 hingga 100 lakukan

s:=s+a*a;

writeln(s);

Tugasan.

Paparkan segi empat sama dan kubus integer dari 1 hingga 8.

Keanehan:

Tindakan yang sama dilakukan sebanyak 8 kali.

blok "kitaran".

i 1 := i * i;

i 2 := i 1 * i;

badan gelung

saya, i 1 , i 2

Program

program qq;

var i, i1, i2: integer;

untuk i:=1 hingga 8 bermula

i1:= i*i;

i2:= i1*i;

writeln(i, i1, i2);

nilai awal

pembolehubah

nilai akhir

Gelung dengan pembolehubah menurun

Tugasan. Paparkan segi empat sama dan kiub integer dari 8 hingga 1 (dalam susunan terbalik).

Keanehan: pembolehubah gelung harus berkurangan.

Penyelesaian:

untuk i:=8 1 bermula

i1:= i*i;

i2:= i1*i;

writeln(i, i1, i2);

turun kepada

Susunan ialah sekumpulan elemen serupa yang mempunyai nama biasa dan terletak bersebelahan dalam ingatan.

Keanehan:

• semua elemen adalah daripada jenis yang sama keseluruhan tatasusunan mempunyai nama yang sama
• semua elemen adalah daripada jenis yang sama
• keseluruhan tatasusunan mempunyai nama yang sama
• semua elemen terletak berdekatan dalam ingatan

Contoh:

• senarai pelajar di dalam kelas pangsapuri dalam sebuah rumah sekolah di bandar
• senarai pelajar di dalam kelas
• pangsapuri dalam sebuah rumah
• sekolah di bandar
• data suhu udara tahunan

NOMBOR elemen tatasusunan

(INDEKS)

tatasusunan

MAKNANYA elemen tatasusunan

BILANGAN (INDEX) elemen tatasusunan: 2

MAKNANYA elemen tatasusunan: 10

Mengisytiharkan Tatasusunan

Kenapa umumkan?

• tentukan Nama tentukan tatasusunan menaip tentukan tatasusunan bilangan elemen sorotan tempat dalam ingatan
• tentukan Nama tatasusunan
• tentukan menaip tatasusunan
• tentukan bilangan elemen
• sorotan tempat dalam ingatan

Tatasusunan integer:

Saiz melalui pemalar:

elemen

indeks berakhir

indeks permulaan

var A : tatasusunan[ 1 .. 5 ] integer ;

var A: tatasusunan integer ;

const N=5;

apa yang salah?

var a: tatasusunan integer;

A := 4.5;

var a: tatasusunan ["z".."a"] integer;

A["B"] := 15;

["a".."z"]

var a: tatasusunan integer;

A := "X";

Pengumuman:

Input papan kekunci:

Operasi mengikut unsur:

Output pada paparan:

const N = 5;

var a: tatasusunan integer;

saya: integer;

a =

a =

a =

a =

a =

untuk i:=1 hingga N bermula

write("a[", i, "]=");

baca(a[i]);

kenapa menulis ?

untuk i:=1 hingga N lakukan a[i]:=a[i]*2;

writeln(" Susunan A:");

untuk i:=1 hingga N lakukan tulis(a[i]:4);

Susunan A:

1 0 24 68 112 26

Tugasan:

1. Masuk c tatasusunan papan kekunci 5 elemen, cari min aritmetik semua elemen tatasusunan.

Contoh:

Masukkan lima nombor:

4 15 3 10 14

purata aritmetik 9.200

PENYELESAIAN:

Program qq;

var N: tatasusunan integer;

untuk i:=1 hingga 5 bermula

tulis("N[",i,"]");

untuk i:=1 hingga 5 bermula

write("purata", k:6:2);

1. 1.Pascal
2. 2. Pascal Pascal dibangunkan oleh saintis Switzerland Niklaus Wirth. Pascal dianggap sebagai alat yang paling penting untuk mengajar kaedah pengaturcaraan berstruktur dan telah diperkenalkan ke dalam kursus di sekolah untuk pelajar yang pakar dalam sains komputer sejak 1983. Selepas itu, bahasa Pascal telah ditambah baik dan memperoleh sifat baharu yang berbeza daripada versi pengarang.
3. 3. Bahasa Pascal agak mudah dipelajari, agak jelas dan logik dan, sebagai bahasa pengaturcaraan pertama yang dipelajari, mengajar gaya yang baik.
4. 4. Seperti bahasa semula jadi, setiap bahasa pengaturcaraan mempunyai gaya dan peraturan tersendiri. Sintaks bahasa pengaturcaraan ialah satu set peraturan yang menentukan cara membina atur cara yang betul daripada aksara abjad.
5. 5. Abjad pascal 26 huruf kecil Latin dan 26 huruf besar Latin: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z a b c d e f g h i j k l m n o p q r s t u v w x y z garis bawah _ 10 digit: operasi 0 1 5 9 * 3 3<> < > <= >= := @ pembatas (pembatas): . , " () (. .) ( ) (* *).. : ; penentu: ^ # $
6. 6. Struktur program (1. pengepala program) Program_Name; (2. bahagian untuk menyatakan modul yang digunakan) menggunakan List_of_Used_Modules; (3. Bahagian Penerangan) label Label_descriptions; const Constant_Descriptions; jenis TypeDescriptions; var Variable_Descriptions; prosedur Perihalan_prosedur_dan_fungsi; fungsi mengeksport Perihalan_Nama_Dieksport; (4. Bahagian penyata) mula Penyata tamat.
7. 7. Struktur atur cara yang dipermudahkan (1. pengepala program) Program_Name; (2. bahagian untuk menyatakan modul yang digunakan) menggunakan List_of_Used_Modules; (3. Bahagian Penerangan) const Constant_Descriptions; var Variable_Descriptions; (4. Bahagian penyata) mula Penyata program tamat.
8. 8. Arahan bahasa pengaturcaraan dipanggil operator. Pemisah operator dalam Pascal ialah; (titik bertitik)
9. 9. Komen ialah serpihan teks program yang dibatasi oleh aksara ( ). Komen dalam program melaksanakan fungsi maklumat. (Program pertama saya) program pertama; mula writeln('Hello, World!') tamat.
10. 10. Contoh: perimeter program segi empat tepat perimeter; (tajuk program) menggunakan crt; (crt – diperlukan untuk mengosongkan skrin) var a,b:integer; (pengisytiharan pembolehubah) P:integer; Mulakan (permulaan program) clrscr; (skrin jelas) a:=12; (kami tetapkan pembolehubah a nilai 12) b:=7; (berikan pembolehubah b nilai 7) P:=2*(a+b); (kami tetapkan nilai ungkapan kepada P) write("P = ",P); (paparkan nilai P) hujung. (tamat program)
11. 11. Program ini memperkatakan data dalam kerjanya. Sesetengah data ditetapkan sebelum program mula dilaksanakan, dan selepas ia bermula, nilainya kekal tidak berubah sepanjang operasi program. Ini adalah pemalar. Data lain mungkin berubah semasa pelaksanaan program. Mereka dipanggil pembolehubah.
12. 12. Perbezaan antara pembolehubah dan pemalar agak jelas: semasa pelaksanaan program, nilai pembolehubah boleh diubah, tetapi nilai pemalar tidak boleh. ata
13. 13. Dengan pembolehubah kita akan bermaksud sel ("kotak") di mana komputer boleh menulis ("tambah") data. Dengan sel kita sebenarnya bermaksud "sekeping ingatan" di mana maklumat disimpan. Untuk menggunakan maklumat yang disimpan dalam sel, setiap sel mesti mempunyai nama sendiri atau, seperti yang sering disebut, pengecam. a b jumlah 5 3 8
14. 14. Pengecam. Nama (pengecam) ialah unsur bahasa - pemalar, label, jenis, pembolehubah, prosedur, fungsi, modul, objek. Pengecam ialah urutan huruf, nombor, dan garis bawah yang bermula dengan huruf atau garis bawah dan tidak mengandungi ruang.
15. 15. Nama boleh mengandungi sebarang bilangan aksara, tetapi 63 aksara adalah penting. Dalam bahasa PASCAL tidak dibenarkan menggunakan perkataan fungsi dan nama standard yang menamakan pemalar piawai, jenis, prosedur, fungsi dan fail sebagai nama. Contoh nama bahasa PASCAL: A b12 r1m SIGMA gamma I80_86
16. 16. Dalam Pascal, perbezaan antara huruf kecil dan huruf besar diabaikan, jadi NaMe dan nama adalah sama.
17. 17. Kata fungsi ialah perkataan yang dalam bahasa PASCAL mempunyai makna semantik tertentu yang tidak boleh diubah. Ia kadangkala dipanggil kata kunci.
18. 18. Perkhidmatan (terpelihara) perkataan: SET PERPUSTAKAAN EKSPORT MUTLAK ASSEMBLER MOD LUARAN SHL DAN NAMA JAUH SHR ARRAY FAIL TIADA STRING ASM UNTUK DEKAT KEMUDIAN ADUN KE HADAPAN TIDAK UNTUK MULAKAN FUNGSI JENIS OBJEK KES GOTO UNIT KONST JIKA PENGGUNAAN TIDAK DIGUNAKAN KONSTRUKSI. PROSEDUR INDEKS DIV VAR PERSENDIRIAN PROGRAM KERJA MAYA WARISAN MANAKALA AWAM DALAM TALIAN DENGAN REKOD ANTARA MUKA YANG LAIN X ATAU TAMAT GANGGUAN ULANGAN EKSPORT LABEL RESIDENT
19. 19. Ruang tidak boleh digunakan dalam aksara ganda atau perkataan terpelihara. Ada nama yang dipanggil standard. sin cos real true Tidak seperti perkataan fungsi, makna nama standard boleh ditakrifkan semula oleh pengaturcara.
20. 20. Ini adalah petunjuk kepada pengkompil berapa banyak memori yang perlu dikhaskan untuk pembolehubah program kami. Dalam atur cara yang disusun, ruang memori diperuntukkan untuk semua pembolehubah dan semua pembolehubah diberikan nilai sifar. Semua pembolehubah yang digunakan dalam program mesti diisytiharkan dalam bahagian perihalan pembolehubah selepas perkataan rizab var. Mengisytiharkan Pembolehubah
21. 21. Data datang dalam pelbagai jenis...
22. 22. Jenis Data Nama jenis standard adalah pengecam yang dipratentukan dan sah di mana-mana dalam atur cara. Ia diterangkan dalam modul Sistem standard, yang secara lalai disertakan dalam senarai modul yang digunakan. Jenis yang ditentukan pengguna ialah jenis tambahan (mudah dan berstruktur) yang ditakrifkan oleh pengguna.
23. 23. Jenis data standard 1. kumpulan jenis integer (Shortint, Integer, Longint, Byte, Word); 2. kumpulan jenis sebenar (Single, Real, Double, Extended, Comp); 3. logik (jenis Boolean)(Boolean, ByteBool, WordBool, LongBool); 4. watak(Char); 5. rentetan (String); 6. indeks (Penunjuk); 7. jenis teks (Teks).
24. 24. Kumpulan jenis integer Nama jenis Jenis julat nilai diperlukan memori Ditandatangani integer pendek Shortint -128 .. 127 1 bait Integer integer yang ditandatangani -32768 .. 32767 2 bait Ditandatangani integer panjang Longint -2147483648 .. 214748 integer Ditandatangani oleh 214748 byte 0 .. 255 1 bait Word integer tidak ditandatangani 0 .. 65535 2 bait
25. 25. Var b: bait; summa, count: integer; Pengisytiharan pembolehubah jenis integer summa:= -365; guna
26. 26. Nombor dalam bahasa PASCAL biasanya ditulis dalam sistem nombor perpuluhan. Tanda positif nombor boleh diabaikan. Integer ditulis dalam bentuk tanpa titik perpuluhan, contohnya: 217 -45 8954 +483
27. 27. Kumpulan jenis nyata mentakrifkan data yang direalisasikan oleh subset nombor nyata. Var A: sebenar; mulakan ... A:=0.65; ...Tamat.
28. 28. Nama jenis Jenis Julat nilai Bilangan digit mantissa Saiz (bait) Nombor nyata ketepatan tunggal Nyata 2.9e-39 .. 1.7e+38 11 6 Nombor nyata ketepatan tunggal 1.5e-45 .. 3.4e+38 7 4 Ketepatan berganda nombor nyata Ganda 5.0e-324 .. 1.7e+308 15 8 Nombor nyata ketepatan tinggi Dilanjutkan 3.4e-4932 .. 1.1e+4932 19 10 Nombor nyata Comp integer -9.2e+18 .. 9.2e+18 19 8
29. 29. Nombor nyata ditulis dalam bentuk dengan titik perpuluhan atau dalam bentuk menggunakan susunan perpuluhan, yang diwakili oleh huruf E: 28.6 0.65 -0.018 4.0 5E12 -1.72E9 73.1E-16
30. 30. Pengecam Boolean sepadan dengan jenis data Boolean. Pembolehubah Boolean bersaiz 1 bait dan boleh mengandungi nilai TRUE atau FALSE. Nilai FALSE sepadan dengan 0, sebarang nombor selain sifar dianggap BENAR. Butang Var, bendera: boolean; Butang mula:=true;
31. 31. Pengecam standard Char sepadan dengan jenis aksara. Pembolehubah jenis aksara dan pemalar boleh mengambil nilai daripada pelbagai aksara ASCII. Var simvol, bukva, z: char; Mengisytiharkan Pembolehubah Simbolik
32. 32. Jenis rentetan sepadan dengan Rentetan pengecam standard. Var S: Rentetan; (rentetan daripada 0 hingga 255 aksara) S2: Rentetan; (stok 5 aksara)
33. 33. Rentetan aksara ialah urutan aksara daripada set aksara ASCII, yang disertakan dalam tanda petikan tunggal. Garis dalam bahasa Pascal ialah urutan aksara yang ditulis di antara apostrof. Jika anda perlu menggunakan apostrof itu sendiri sebagai watak yang bermakna dalam baris, maka anda harus menulis dua apostrof. Contoh rentetan: "STRING" "STRING" "AD" "YUTANT"
34. Jenis aksara, serta jenis integer dan Boolean, dikelaskan sebagai jenis ordinal yang dipanggil.  Set nilai sah mana-mana jenis ordinal ialah urutan tertib, setiap elemen mempunyai nombor ordinal sendiri (bermula dari 0).
35. 35. Fungsi Ord mengembalikan nombor ordinal nilai ini dalam pengisytiharan jenis. Ord(2)=2, Ord(‘0’)=48 Writeln(ord(‘e’)); Writeln(ord('9'));
36. 36. Jadual pengekodan ASCII ASCII (Kod Piawai Amerika untuk Pertukaran Maklumat; disebut “ask”) ialah pengekodan komputer untuk mewakili abjad Latin, angka Arab, beberapa tanda baca dan aksara kawalan. Ia diperkenalkan oleh American Standards Institute ANSI.

Pengaturcaraan dalam Algoritma bahasa Pascal dan sifatnya

Apakah algoritma? 3 Muhammad al-Khwarizmi (c. 783–c. 850) Algoritma ialah huraian tepat tentang susunan tindakan yang mesti dilakukan oleh pelaku untuk menyelesaikan masalah dalam masa yang terhad. Pelaksana ialah peranti atau makhluk bernyawa (seseorang) yang mampu memahami dan melaksanakan arahan yang membentuk algoritma. Pelaku formal: tidak memahami (dan tidak dapat memahami) maksud arahan (perintah yang sama sentiasa dilakukan dengan cara yang sama).

Sifat-sifat algoritma 4 Diskret - algoritma terdiri daripada arahan yang berasingan, setiap satunya dilaksanakan dalam masa yang terhad. Determinisme (kepastian) - setiap kali algoritma dijalankan dengan data awal yang sama, hasil yang sama diperoleh. Kebolehfahaman - algoritma mengandungi hanya arahan yang merupakan sebahagian daripada sistem arahan pelaksana. Keterhinggaan (keberkesanan) - untuk set data yang betul, algoritma mesti diselesaikan selepas masa yang terhad. Ketepatan - untuk data input yang sah, algoritma mesti membawa kepada hasil yang betul.

Bagaimanakah algoritma berfungsi? 5 objek diskret 1 2 3 4 algoritma langkah 1 langkah 2 langkah 32 3 4 5 5 4 3 2 objek diskret 25 16 9 4 menerima objek diskret sebagai input dan hasilnya membina objek diskret lain (atau mengeluarkan mesej ralat) memproses objek langkah demi langkah Setiap langkah menghasilkan objek diskret baharu

Cara-cara menulis algoritma 6 pseudokod bahasa semula jadi wujudkan sambungan sehingga arahan “berhenti” diterima terima arahan laksanakan perintah tamatkan sesi komunikasi wujudkan sambungan nc terima arahan laksanakan perintah kc_at arahan = ‘hentikan’ tamatkan sesi komunikasi

Cara-cara menulis algoritma 7 set diagram blok. sambungan; ulang cmd: = dapatkan. Perintah; laksanakan. Perintah(cmd); sehingga cmd = "berhenti"; dekat. sambungan; program menerima arahan mewujudkan sambungan menamatkan sambungan melaksanakan arahan "berhenti"? Tidak juga

9 Atur cara ialah algoritma yang ditulis dalam bahasa pengaturcaraan, satu set arahan untuk komputer. Arahan ialah penerangan tentang tindakan yang mesti dilakukan oleh komputer. di mana untuk mendapatkan data sumber? apa yang patut dilakukan dengan mereka? 1970 - Bahasa Pascal (N. Wirth) Operator ialah arahan dalam bahasa pengaturcaraan peringkat tinggi.

Program paling mudah 10 Program (nama program); mula (permulaan program) (badan program) tamat. (akhir program) ulasan dalam kurungan () tidak diproses Apa yang program ini lakukan? ? nama algoritma

Paparan 11 program z 1; mula tulis('2+'); (tanpa peralihan) tulis ln('2=?'); (pada baris baharu) tulis ln(‘Jawapan: 4’); tamat. Protokol: 2+2=? Jawapan:

Output ke skrin 12 tulis(( senarai output )); ( tanpa lompat ) tulis ln (( senarai keluaran )); (pada baris baharu) Senarai keluaran: 1. Nilai ungkapan aritmetik. 2. Senarai pembolehubah yang dipisahkan dengan koma. 3. Teks dalam apostrof. Contoh: tulis(SQRT (58) / 0. 5); writeln(a, b, c); writeln(‘Genap’);

Keluaran data 13 ( keluaran nilai pembolehubah a) ( keluaran nilai pembolehubah a dan peralihan ke baris baharu) ( keluaran teks dan nilai pembolehubah c) tulis(a); tulis log(a); writeln(‘ Hello! ‘); writeln(‘ Jawapan: ‘ , c); writeln(a, '+', b, '=', c);

Ungkapan aritmetik 14 a: = (c + b * 5 * 3 - 1) / 2 * d; Keutamaan (kekananan): 1) fungsi 2) kurungan 3) pendaraban dan pembahagian 4) penambahan dan penolakan 213 4 5 6 d bc a

Fungsi piawai 15 abs (x) - modulus sqrt (x) - punca kuasa dua sqr (x) - sin kuasa dua (x) - sinus sudut yang diberi dalam radian cos (x) - kosinus sudut yang diberi dalam radian exp (x) - eksponen e x ln (x) - batang logaritma asli (x) - potong bahagian pecahan bulat (x) - pembundaran kepada integer terdekat writeln('x^8 ', exp (ln (x)*8): 0: 3);

Tugasan 16 “A”: Paparkan nilai pembolehubah V (isipadu bola) jika R=5 (R-radius). Mengikut jenis: V = (nilai) “B”: Paparkan gambar huruf Ж Жжжжжжж HH HH ZZZZZ “C”: Paparkan nilai pembolehubah V (isipadu kubus), jika H = 7 (H ialah panjang tepi kubus). Mengikut jenis: V = (nilai)

Menambah nombor 17 Masalah. Masukkan dua nombor dari papan kekunci dan cari jumlahnya. Protokol: Masukkan dua integer 25 30 25+30=55 komputer pengguna komputer mengira sendiri! 1. Bagaimana untuk memasukkan nombor ke dalam ingatan? 2. Di mana untuk menyimpan nombor yang dimasukkan? 3. Bagaimana untuk mengira? 4. Bagaimana untuk memaparkan keputusan? ?

Jumlah: pseudokod 18 program qq; mula (masukkan dua nombor) (kira jumlahnya) (paparkan jumlah pada skrin) tamat. Pseudokod: algoritma dalam bahasa Rusia dengan unsur Pascal. Komputer tidak boleh melaksanakan pseudokod! !

Pembolehubah 19 Pembolehubah ialah nilai yang mempunyai nama, jenis dan nilai. Nilai pembolehubah boleh diubah semasa program berjalan. Maksud Nama Adakah ia sesuai? ? Jenis data lain Pembolehubah menyimpan data jenis tertentu!!

Nama boleh ubah 20 ANDA BOLEH menggunakan huruf Latin (A-Z) nombor garis bawah _ huruf besar dan huruf kecil JANGAN berbeza nama tidak boleh bermula dengan nombor Nama manakah yang betul? AXby R&B 4 Roda Vasya “Pes. Barbos” TU 154 _ABBA A+

Pengisytiharan pembolehubah 21 Jenis pembolehubah: integer (integer) nyata (nyata) dan lain-lain... Pengisytiharan pembolehubah: var a, b, c: integer; memperuntukkan ruang dalam pembolehubah memori – jenis pembolehubah – senarai integer nama pembolehubah

Jenis pembolehubah 22 julat nilai yang dibenarkan operasi yang dibenarkan format penyimpanan data saiz memori untuk mengelakkan ralat tidak disengajakan

Memasukkan nilai ke dalam pembolehubah 23 baca (a); 1. Program menunggu pengguna memasukkan nilai dan tekan Enter. 2. Nilai yang dimasukkan ditulis kepada pembolehubah a. ! operator input

Memasukkan nilai pembolehubah 24 dipisahkan oleh ruang: 25 30 melalui Enter: 25 30 baca (a, b); Memasukkan nilai dua pembolehubah (dipisahkan oleh ruang atau Enter). a 25 b

Menukar nilai pembolehubah 25 var a, b: integer ; . . . a: = 5 ; b: = a + 2 ; a: = (a + 2)*(b – 3); b: = b + 1 ; a? 5 5 b ? 5+27 a 5 7*428 b 7 7+

Data keluaran 26 (output nilai pembolehubah a) (output nilai pembolehubah a dan pergi ke baris baharu) (teks output dan nilai pembolehubah c) tulis(a); tulis log(a); writeln(‘ Hello! ‘); writeln(‘ Jawapan: ‘ , c); writeln(a, '+', b, '=', c);

Menambah nombor: penyelesaian mudah 27 program Sum ; var a, b, c: integer ; mula membaca (a, b); c: = a + b; writeln(c); tamat. apa yang salah? ?

Menambah nombor: penyelesaian lengkap 28 program Jumlah ; var a, b, c: integer ; mula writeln('Masukkan dua integer'); baca (a, b); c: = a + b; writeln(a, '+', b, '=', c); tamat. Protokol: Masukkan dua integer 25 30 25+30=55 pengguna komputer

Sekali lagi mengenai operator output 29 a: = 123 ; tulis(a: 5); Output format: Penilaian ungkapan: writeln (a, ‘+’ , b, ‘=’ , a+b); a+b 123 5 aksara

Ungkapan aritmetik 30 a: = (c + b * 5 * 3 - 1) / 2 * d; Keutamaan (kekananan): 1) kurungan 2) pendaraban dan pembahagian 3) penambahan dan penolakan 213 4 5 6 d bc a

Fungsi piawai 31 abs (x) - modulus sqrt (x) - punca kuasa dua sin (x) - sinus sudut diberikan dalam radian cos (x) - kosinus sudut diberikan dalam radian exp (x) - eksponen e x ln (x ) - logaritma asli trunc (x) - memotong bahagian pecahan bulat (x) - pembundaran kepada integer terdekat