Rutine I/O
I/O este preocupat de schimbul de informații între RAMși medii de stocare externe (terminal de intrare/ieșire, ADPU, HDD (dischetă), LMD (hard disk) și alte dispozitive).
În limbajul Pascal mijloace standard comunicarea dintre o persoană și un computer sunt fișiere de intrare și ieșire predefinite, care sunt implicit parametri de program. Programul primește date de intrare din fișierul de intrare și plasează rezultatul procesării în fișierul de ieșire. În mod implicit, fișierul de intrare este alocat tastaturii, iar fișierul de ieșire este alocat ecranului terminalului.
Există următoarele tipuri de operator de intrare (proceduri de citire):
CITEȘTE (A1,A2,A3,...,AN)
READLN (A1,A2,A3....AN)
unde A sunt variabilele cărora li se atribuie secvenţial valorile de intrare.
În timpul execuției programului, de îndată ce este întâlnită instrucțiunea READ (READLN), computerul „se oprește” și așteaptă introducerea valorilor numerice, simbolice. Când se introduc valori și se apasă tasta Enter, execuția programului continuă. Tasta Enter este apăsată după introducerea datelor pentru fiecare procedură de citire. Valorile sunt introduse după (cel puțin) un spațiu după ce ați tastat întregul program și îl rulați pentru execuție.
Operatorul READLN (A1,A2,...AN) introduce mai întâi valorile variabilelor și apoi, spre deosebire de operatorul READ (Al, ...,AN), trece la o nouă linie.
Utilizarea unei instrucțiuni de intrare fără parametri READLN pur și simplu avansează la o nouă linie de intrare. Operatorul READLN (A1....AN) este echivalent cu utilizarea a 2 operatori READ (Al.....AN) și READLN.
De exemplu:
1) VAR A, B.: REAL
C. D: INTEGER;
CITEȘTE(A.B);
CITEȘTE(C,D);
READLN(A,B);
READLN(C,D);
CITEȘTE(A.B);
CITEȘTE(C.D);
În primul caz, după ce ați tastat fiecare pereche de date într-o singură linie, apăsați tasta Enter. În al doilea caz, procedura de citire este similară. Diferența este că, după ce valorile A și B sunt citite de prima procedură de citire, datele pentru următoarea procedură de citire vor fi citite de la început linie nouă, adică set de date pentru variabilele A,B,C,D pentru primul și, respectiv, al doilea caz, vor arăta astfel:
1) 4,83 E - fZ 35,71 E + f1Enteg 51 2134 Enter
2) 4,83 E - f3 35,71 E + f1Ep1eg
Pot fi introduse date întregi, reale și caractere. Introducerea datelor de caractere are propriile sale particularități, deoarece un spațiu, ca orice caracter în limbajul Pascal, este clasificat ca date de caractere. Datele de caractere sunt introduse ca o linie continuă. De exemplu:
VAR A.B.C.D: CHAR;
CITEȘTE(A.B.C.D);
Tastați Kyiv pe tastatură și apăsați tasta Enter. Variabilele vor primi următoarele valori: A-"K", B-"I", C-"E", D-"B". O altă caracteristică a introducerii datelor de caracter este că apăsarea tastei Enter în sine este percepută ca un caracter de spațiu, așa că pentru introducerea corectă este recomandat să puneți un operator READLN înaintea fiecărui operator pentru introducerea datelor de caractere, astfel încât acestea să fie introduse întotdeauna pe o linie nouă.
Există următoarele tipuri de operator de inferență.
SCRIE (A1,A2.....AN);
WRITELN (A1,A2,...,AN);
WRITELN;
Parametrii A1, A2,..., AN pot fi variabile întregi, reale, caractere (șir) și logice.
Sunt permise ieșiri formatate și date cu formate care determină lățimea câmpului de selecție.
Cu ieșire fără format pentru valorile variabilelor de ieșire diverse tipuri este alocat un număr standard de posturi (definit pentru o anumită clasă de mașini). De exemplu, pentru calculatoarele PC EC, PC IBM.
Lungimea totală a câmpului pentru valoarea unei variabile de tip real ocupă 18 poziții, iar partea fracțională a numărului în sine ocupă 10 poziții.
Formatele de ieșire din instrucțiunea de ieșire sunt specificate cu două puncte după variabila de ieșire. Pentru numerele reale, formatul poate consta din două cantități. Primul denotă câmpul general al valorii de ieșire, al doilea - câmpul părții fracționale. În acest caz, câmpul general include semnul numărului, punctul zecimal și numărul de cifre din părțile întregi și fracționale.
Iată câteva exemple de date de ieșire cu formate pentru valorile variabilelor de mai sus.
La ieșirea valorii unei variabile reale B, în primul caz, se utilizează un format în virgulă mobilă (format normalizat) folosind un factor zecimal - litera latină E (care separă mantisa numărului de ordin). Lungimea minimă a câmpului de ieșire este de 8 caractere. În al doilea caz, valoarea lui B este scoasă în format de virgulă fixă.
Dacă câmpul format selectat este mai mare decât numărul de poziții ocupate de număr, atunci numărul corespunzător de spații va fi alocat înaintea părții întregi, iar numărul corespunzător de zerouri va fi alocat după partea fracțională.
Prima parte a ultimei observații se aplică și cazurilor de ieșire a valorilor caracterului, șirului și variabilelor logice
| Funcţie | Scop | Tipul argumentului | Tipul funcției |
| Abs(x) | Calcul valoare absolută X | R, eu | R, eu |
| Sin(x) | Calculați valoarea funcției SIN arg. X | R, eu | R, R |
| Cos(x) | Calculați valoarea funcției COS arg. X | R, eu | R, R |
| Arctan(x) | Calculați valoarea funcției ARCTG args. X | R, eu | R, R |
| SQR(x) | Calculează valoarea pătratului argumentului. | R, eu | R, eu |
| SQRT(x) | Calculează valoarea rădăcinii pătrate a lui X | R, eu | R, R |
| EXP(x) | Calculul valorii funcției exponențiale a argumentului. | R, eu | R, R |
| EXP10(x) | Se calculează 10 la puterea lui X | R, eu | R, R |
| Ln(x) | Calculul valorii funcției logaritmului natural al unui argument. | R, eu | R, R |
| LOG(x) | Calcularea valorii logaritmului zecimal al unui argument | R, eu | R, R |
| TRUNC(x) | Găsirea părții întregi a lui X | R, eu | eu, eu |
| INT(x) | Evaluarea părții întregi a unui argument | R, R | R, R |
| ROUND(x) | Rotunjește X la cel mai apropiat număr întreg. | R, eu | eu, eu |
| FRAC(x) | Calculează partea fracționară a unui argument | R | R |
| ODD(x) | ADEVĂRAT dacă X este un număr impar; | FALS dacă X este un număr par; | eu |
| B | ORD(x) | 1. Găsirea numărului unei valori de tip enumerat 2. Găsirea numărului unui simbol în limbajul Pascal (în sistemul zecimal) | Enumerare C |
| eu eu | CHR(x) | FALS dacă X este un număr par; | Determinarea unui simbol în limbajul Pascal prin numărul său de serie. |
C
SARCINA GENERALĂ
1. Studiază pe cont propriu
a) construirea celei mai simple structuri de program în Pascal;
b) tipuri de date, descrierea constantelor, variabilelor, funcţiilor standard;
c) reguli de scriere a expresiilor aritmetice. 2. Cunoașteți Informații generale
şi instrucţiuni metodologice pentru acest lucru de laborator.
3. Creați un algoritm și un program pentru rezolvarea problemei propuse. 4. Depanați pe un computer program de lucru
. Imprimați lista de programe, datele de intrare și rezultatul calculului.
Sarcini individuale
Calculați pe computer:
, cu c=0,7; m=0,3'10-2; a=5; n=1,2- ;
, cu r=5; k=1,24´10 -7; t=0,1´10 -6 ;z=0,5´10 2 
; 
, cu a=0,1; b=1,4; a=0,02; z=3´10 -3; k=4,5- ;
, cu a=3,4; b=1,1; c=9 - ;
, la 5=0,8; b=1,5; a=3; a=0,394 - ;
, cu λ=0,1; b=0,6; c=2,4´10-4; t=15 
; 
, cu a=0,1; b=88;; c=0,2´10 -6
; 
, cu a=0,3; b=0,9; c=0,61
; 
, cu a=38,9; b=-4,7; c=5; z=0,8- ;
, cu a=15,123; b=9,563; z=0,717 
; 
, cu a=0,5; b=3,1; c=1,4
, cu a=4,4; b=0,57; c=6; z=0,054
; , cu a=0,5; b=2,7; c=0,4;
; 
; , la a=4,5´10 -4; b=-2´10 -5; c=25
, cu a=9,6; b=8,2; c=2; k=0,7
; 
; , cu a=1,256; b=-13,5; c=4
; 
, cu a=1,256; b=3,5; c=0,53; z=7- ;
, cu a=2,8; b=16,4; c=-5,4 
, cu a=2,953; b=0,254; c=0,5
; 
; , cu a=4,125; b= -1,234; c=0,487
; 
, cu a= -0,92; b= 0,58- ;
, cu a=1,725; b=19; c= -2,153 
, cu a=3,457; b= 3,1; c=2
; , cu a=2,389; b= 3,1; c=17
; , cu a=-0,5; b= 1,7; t=0,44
; 
; , cu a=0,816; b= 3,4; c=16,7
, cu a=1,1; b= 0,2; c=4´10 -3
Întrebări de securitate
| KAFEDRA_SAPR | AJUTOR+MA |
| KAFEDRA SAPR | Ajutați-mă |
| KAFEDRASAPR | ABC...XYZ |
| OK16 | PENTRU |
| 160KT | SIGMA |
| ABVGD | SIGMA? |
| abvgd | numarul 1 |
| Un BVGD | numarul 1 |
| A.B.V.G.D. | XXXXXXXXXXX |
2. Este posibil să se schimbe valorile constantelor din program?
3. Care dintre următoarele afirmații de atribuire sunt corecte dacă variabile
I,J,K:INTEGER;
X,Y:REAL;
A,B:BOOLEAN
A:=(X
I:=I+K/I;
X:+I+J-B;
4. Este acceptabil să folosim cantități de diferite tipuri în expresii aritmetice?
5. Care dintre următoarele intrări sunt corecte din punctul de vedere al limbajului Pascal?
"O"<"В" ; "А"<"В" AND 4<5;
ADEVĂRAT>FALSE; ("C"<"D") OR (4<5);
"8"<"3" ;
6. Este posibil să se atribuie o expresie de tip real unei variabile de tip întreg și invers, unei variabile de tip real - o expresie de tip întreg?
7. Ce funcții sunt concepute pentru a converti valorile de tip real în valori de tip întreg?
8. Găsiți erori în programul RM1 (dacă există) și corectați-le.
PROGRAM;
(Program de control)
VARY X: INTEGRE, Y REAL X + 3: = Y;
Y:=Y + 5,7;
Z:= 4X + 9Y
În programare, destul de des trebuie să efectuați același tip de acțiuni și în sarcini de diferite niveluri și clase. Și pentru a accelera procesul de scriere a codului, aceste acțiuni sunt plasate în subrutine speciale - funcții standard. O astfel de subrutină este accesată prin numele său, iar valoarea argumentului este indicată în paranteze. Următorul tabel listează acele funcții standard care sunt utilizate în limbajul de programare Pascal.
| Funcţie | Scop |
| ABS(x) | Calculul valorii absolute a lui x: |x| |
| SQR(x) | Calcularea pătratului lui x: x*x |
| SIN(x) | Calculul sinusului x: sin x |
| COS(x) | Calcularea cosinus x: cos x |
| ARCTAN(x) | Calculul arctangentei x: arctan x |
| EXP(x) | Calculul exponentului (numărul E) la puterea x |
| EXP10(x) | Calculând 10 la puterea x |
| LN(x) | Calcularea logaritmului natural al lui x |
| LOG(x) | Calcularea logaritmului zecimal al lui x |
| SQRT(x) | Calcularea rădăcinii pătrate a lui x |
| A DIV B | Calculul coeficientului la împărțirea lui A la B cu restul aruncat |
| A MOD B | Aflarea restului la împărțirea lui A la B |
| TRUNC(x) | Găsirea părții întregi a lui x |
| RANDOM(x) | Număr pseudo-aleatoriu în interval |
| ROUND(x) | Rotunjiți valoarea x la cel mai apropiat număr întreg |
| ODD(x) | Verifică argumentul pentru paritatea impară. Rezultatul este TRUE dacă argumentul este impar, FALS dacă este par. |
| ORD(x) | Returnează numărul ordinal al argumentului și, în consecință, convertește o valoare de tip ordinal într-o valoare de tip întreg. |
| CHR(x) | Determinarea unui simbol în limbajul Pascal după numărul său ordinal |
| SUCC(x) | Găsirea elementului care vine după cel dat în lista de elemente permise |
| PRED(x) | Găsirea elementului care vine înaintea celui dat în lista de elemente valide |
| FRAC(X) | Returnează partea fracțională a lui x |
| INT(X) | Returnează partea întreagă a lui x |
| Pi | Valoarea constantei matematice π |
| EOF(x) | Returnează TRUE dacă fișierul se află la „sfârșitul fișierului”, altfel FALSE dacă nu există un sfârșit de fișier |
Expresii
O expresie constă din variabile, constante, câmpuri din înregistrări, indicatori de funcție, paranteze și semne operator. Pentru a scrie corect expresii, trebuie să știți nu numai cum sunt desemnate anumite operații, funcții etc., dar merită să luați în considerare și prioritățile execuției lor, regulile matematice și logice, precum și unele subtilități ale limbajului în sine. Pentru un studiu mai aprofundat al expresiilor, merită să luăm în considerare câteva exemple.
1) 12+3*3=21 (12+3)*3=45
După cum puteți vedea expresiile din Pascal, au aceeași prioritate ca la matematică, iar folosind paranteze se poate schimba.
2) (a >1) și (a<=20)
O astfel de expresie logică returnează adevărată numai dacă ambele expresii sunt adevărate, adică dacă o este în intervalul de la 1 la 20 inclusiv. Merită să fiți atenți la paranteze aici sunt necesare pentru a schimba prioritatea, deoarece operatorii de comparație au cea mai mică prioritate.
3) (a+3>0) și (a+3<15) or (b>1) și (b<10)
Condiția va returna adevărată dacă cele două condiții din stânga sau dreapta SAU sunt adevărate și, de asemenea, dacă ambele sunt adevărate.
Operația logică SAU (sau) este o disjuncție în logică și, prin urmare, are următorul tabel de adevăr:
| X | Y | X sau Y |
| 0 | 0 | 0 |
| 0 | 1 | 1 |
| 1 | 0 | 1 |
| 1 | 1 | 1 |
Fals apare numai atunci când X și Y sunt false (zerouri). În cazul în care true este returnat numai atunci când una dintre condiții este adevărată, operatorul trebuie aplicat XOR(exclusiv sau).
Pentru a efectua operațiuni și transformări frecvente ale datelor aparținând diferitelor tipuri, există funcții predefinite numite STANDARD. Pentru a accesa o funcție, trebuie să specificați numele acesteia și o listă de argumente (parametri) între paranteze.
Înainte de a trece la funcțiile standard, să ne familiarizăm mai întâi cu regulile de utilizare a acestora:
- 1. Numele funcției este scris cu majuscule din alfabetul latin.
- 2. Argumentul funcției este scris între paranteze după numele funcției.
- 3. Argumentul funcției poate fi o constantă, variabilă sau o expresie aritmetică de același tip
Acum să ne uităm la câteva funcții standard:
Funcție Acțiune Tip X Tipul valorii returnate
SQRT(X) calculează rădăcina pătrată a lui X real real
SQR(X) calculează pătratul argumentului X întreg real întreg real
RANDOM(X) returnează un număr aleator înainte de a apela funcția, este recomandabil să se folosească operatorul RANDOMIZE în program, care include inițializarea aleatorie a generatorului de numere aleatoare, pozitive corespunde tipului de variabilă care primește valoarea;
SIN(X) calculează sinusul lui X real real
COS(X) calculează cosinusul argumentului X real real
ABS(X) calculează valoarea absolută (modulul) argumentului X întreg real întreg real
ODD(X) verifică X pentru paritate logic întreg lung
ORD(X) specifică caracterul ordinal X de orice tip, altul decât întregul lung real
CHR(X) definește un caracter în funcție de numărul de serie X caracter octet
PRED(X) determină valoarea anterioară în raport cu X orice alt tip decât cel real de același tip
SUCC(X) specifică o valoare ulterioară cu privire la X de orice tip, altul decât real de același tip
ARCTAN(X) calculează arctangenta argumentului X real real
EXP(X) calculează exponentul lui X real real
LN(X) calculează logaritmul natural al lui X real real
TRUNC(X) găsește partea întreagă a lui X întreg real lung
ROUND(X) rotunjește X la cel mai apropiat întreg întreg real lung
INT(X) returnează partea întreagă a argumentului X real real
FRAC(X) returnează partea fracțională a argumentului X real real
DEC(X,N) scade valoarea variabilei X cu un număr dat N orice alt tip decât cel real de același tip
INC(X,N) mărește valoarea variabilei X cu un număr dat N orice alt tip decât cel real de același tip
PI returnează valoarea numerică - reală
- 1. ORD(‘R’)=82; ORD(5)=5;
- 2. CHR(68)=’D’; puteți apela această funcție prin # dacă argumentul funcției este o constantă (#68="D");
- 3. PRED(‘N’)=’M’; PRED(87)=86;
- 4. SUCC(‘S’)=’T’; SUCC(87)=88;
- 5. PI=3,141592653897932385;
- 6.ROUND(3,1415)=3;
- 7. LN(1)=0,000;
- 8. SQRT(36)=6.000;
- 9. SIN(90*pi/180)=1.000.
Comentariu:
În funcțiile trigonometrice, argumentul trebuie dat doar în măsura unghiului radian.
Sfârșitul mesei. 2
| TRUNC(X) ROUND(X) | Izolați partea întreagă a unui număr Runda X la cel mai apropiat număr întreg | real | întreg |
| PRED(X) SUCC(X) | Găsirea valorii precedente (în tipul său) Găsirea elementului următor (valoarea după X în tipul său ordinal) | întreg, boolean sau caracter | |
| ORD(X) | Determinarea numărului ordinal al caracterului X dintr-un set de caractere sau tipul său enumerat | simbolic | întreg |
| CHR(X) | Determinarea semnificației unui simbol prin numărul său de serie | întreg | simbolic |
| ODD(X) | Funcție logică de paritate impară | întreg | logic |
| Frac(X) Int(X) | Partea fracțională a unui număr Partea întreagă a unui număr | real | real |
Tipuri întregi în Pascal ABC
Pascal ABC are trei tipuri standard de întregi: Byte, Integer și Word. Intervalul valorilor lor posibile depinde de reprezentarea internă a numărului, care poate ocupa unul, doi sau patru octeți. Tabelul 3 prezintă caracteristicile acestor tipuri de numere întregi.
Tabelul 3
Clasificarea tipurilor întregi
Compilatorul Pascal ABC definește o valoare maximă de MAXINT pentru datele de tip INTEGER. În acest caz, următorul raport va fi valabil:
MAXINT<= K <= MAXINT
Variabilele de tipuri întregi sunt descrise în secțiunea descrieri VAR:
Var <имя переменной> : <целый тип>;
Unde<întreg tip> poate fi specificat ca octet, întreg sau cuvânt.
De exemplu:
VAR K : ÎNTREG;
eu, J : BYTE;
Pentru tipurile întregi sunt definite următoarele operații: adunare, scădere (au prioritate mai mică), înmulțire și împărțire - DIV, MOD. Funcțiile din Tabelul 4 sunt aplicabile pentru tipurile întregi Funcțiile TRUNC(X) și ROUND(X) cu un argument real produc de asemenea un rezultat întreg (vezi Tabelul 2). Funcțiile matematice standard, când li se oferă un argument întreg, returnează întotdeauna valori reale (vezi Tabelul 2).
Când utilizați proceduri și funcții cu parametri întregi, ar trebui să vă ghidați după regula „imbricare” a tipurilor, adică. Oriunde este folosit un tip WORD ca argument, poate fi folosit tipul BYTE. Pentru operațiile aritmetice, dacă operanzii sunt de diferite tipuri întregi, tipul rezultat are cardinalitatea maximă a intervalului, adică. Pentru tipurile de operanzi Byte și Word dintr-o expresie, tipul de rezultat va fi Word.
Tabelul 4
Proceduri și funcții încorporate pentru tipurile întregi
Tipuri reale
Spre deosebire de tipurile întregi, valorile tipurilor reale definesc un număr cu virgulă zecimală doar cu o anumită precizie, în funcție de reprezentarea internă a numărului. Un număr real este stocat în memoria computerului într-un format format din semn, mantisă și ordinea numărului. Se presupune că punctul zecimal este plasat înaintea cifrei din stânga (cea mai semnificativă) a mantisei (o astfel de mantise se numește normalizată). La efectuarea operațiunilor, punctul zecimal este deplasat prin înmulțirea mantisei cu E(simbol exponent) cu ordine.
De exemplu, scrieți un număr sub forma: <знак> <мантисса>E<порядок> corespunde reprezentării numerelor<зnak><мантисса>*10 < порядок > .
Pascal ABC folosește doar două tipuri reale - REAL și COMPLEX, ale căror caracteristici sunt prezentate în Tabelul 5.
Tabelul 5
Tipuri reale
Variabilele de tipuri reale sunt declarate în secțiunea de declarare a variabilelor din VAR, similar cu variabilele de tipuri întregi sub forma:
Var <переменная> : <вещественный тип>;
Unde<tip real> poate fi specificat doar Real sau Complex.
Pentru a lucra cu tipuri reale, sunt definite funcții standard: sin, cos, arctan, ln, exp, sqr, abs, sqrt (Tabelul 2), precum și funcțiile de tip real (Tabelul 6).
Tabelul 6
Funcții încorporate de tip real
În acest caz, operațiile +, -, *, / într-o expresie aritmetică dau un rezultat real dacă cel puțin unul dintre operanzi este real.
Funcțiile standard ale limbajului de programare Pascal sunt prezentate în tabel. 1
Tabelul 1:
| Numele funcției | Operația de efectuat | |
| ABS(X) | Calculează modulul argumentului x, tipul lui x este real sau întreg, tipul rezultatului este același cu tipul argumentului | |
| SQR(X) | Calculează pătratul argumentului (x 2), tipul de x este real sau întreg, rezultatul se potrivește cu tipul argumentului | |
| SQRT(X) | Calculează rădăcina pătrată a argumentului x (x>0); tip x – real sau întreg, tipul rezultat este real | |
| SIN(X) | Calculează sinusul argumentului x (x – în radiani); tip x – real sau întreg, tip rezultat real | |
| COS(X) | Calculează cosinusul argumentului x (x – în radiani); tip x – real sau întreg, tip rezultat real | |
| ARCTG(X) | Calculează arctangenta argumentului x (x – în radiani); tip x – real sau întreg, tip rezultat real | |
| EXP(X) | Ridicarea numarului e=2,71828 la puterea x (e x), tipul lui x este real sau intreg, tipul rezultatului este real |
Aceste funcții sunt conținute în memoria mediului de programare Pascal și sunt rutine pentru calcularea funcțiilor cele mai frecvent utilizate folosind metode iterative.
Exemple de întocmire a unui program liniar
Exemplul 1 Aflați media aritmetică a trei numere - două numere întregi (X și Y) și unul real (Z) și pătratul mediei aritmetice.
Program:
Program mediu;
X, Y: întreg;
Z, Midd, SqrMidd: Real;
WriteLn("Introduceți două numere întregi X și Y:");
ReadLn(X,Y);
WriteLn("Introduceți numărul real Z:");
ReadLn(Z);
Midd:=(X+Y+Z)/3;
SqrMidd:=SQR(Mijloc)
Writeln("Media aritmetică = ",Mijloc);
Write("Pătrat al mediei aritmetice = ",SqrMidd);
Descrierea programului
Titlul programului indică numele programului - Midding (mijloc), apoi cuvântul var deschide secțiunea de descriere a variabilelor: X și Y sunt numere întregi, Z este real. Cuvântul începe deschide blocul principal al programului, în care:
▪ operatorul WriteLn afișează textul „Introduceți două numere întregi X și Y:”;
▪ operatorul ReadLn(X,Y) citește valorile numerelor introduse de la tastatură și le atribuie variabilelor întregi X și respectiv Y;
operatorul ReadLn(Z) citește valoarea unui număr introdus de la tastatură și o atribuie variabilei reale Z;
▪ apoi operatorul de atribuire calculează valoarea medie a lui X,Y,Z și o atribuie variabilei Midd, apoi pătratul acestei valori este calculat în mod similar și atribuit variabilei SqrMidd;
▪ operatorul Writeln afișează textul „Media aritmetică =”,
valoarea calculată a lui Midd și mută cursorul pe o nouă linie;
▪ operatorul Write afișează textul „Pătrat al mediei aritmetice = ” și valoarea calculată SqrMidd;
▪ operator final. închide blocul principal și încheie programul.
Exemplul 2 Calculați aria cercului S și circumferința L pe baza razei date R.
Program
Programul KRUG;
const P=3,14159
R,S,L:Real;
Citire(R);(introduceți valoarea razei)
L:=2*P*R;
S:=P*SQR(R);
Writeln(Circumference = ",L,"cm");
Scrie ("Aria cercului = ",S,"cm2");
, cu a=1,1; b= 0,2; c=4´10 -3
1 Din ce secțiuni constă orice program Pascal?
2 Formatul și scopul operatorului de atribuire.
3 Formatul și scopul operatorilor de introducere a datelor.
4 Formatul și scopul operatorilor de ieșire a datelor.
Exercita
| Găsiți aria suprafeței unui cub folosind formula T=6a 2 | |
| Determinați distanța parcursă de un corp fizic în timpul t dacă corpul se mișcă cu o viteză constantă v. | |
Calcula:  |
|
| Într-un an sunt aproximativ 3.156x10 7 secunde. Scrieți un program care solicită vârsta în ani și îl convertește în secunde. | |
| Calcula: | |
| Aflați volumul cilindrului folosind formula: V=pR 2 H | |
| Aflați distanța de la punctul cu coordonatele (x,y) la origine. | |
| Greutate m o moleculă de apă este aproximativ egală cu 3,0x10 -23 g. Un litru de apă înseamnă aproximativ 950 de grame. Scrieți un program care cere cantitatea de apă în litri și imprimă numărul de molecule din acea cantitate de apă. | |
| Aflați volumul cubului folosind formula V=a 3. (cu și fără utilizarea funcțiilor standard). | |
| Calcula: | |
| Scrieți un program care solicită numărul de zile și se convertește în săptămâni și zile. De exemplu, 18 zile = 2 săptămâni și 4 zile. | |
| Aflați diagonala și aria unui pătrat | |
Calcula:  |
|
| Găsiți aria suprafeței laterale a mingii: T=4pR2 | |
| Calcula: | |
Calcula:  |