O sarcină dintr-o serie de sarcini implementate folosind limbajul de programare Pascal. Pentru muncă este de dorit să se utilizeze noua versiune a programului pe platforma PascalABC.NET.
aplicații
Această sarcină poate fi utilizată în compilarea muncii independente, de control și acasă la școala secundară sau la finalizarea cursului de informatică în ACT.
Textul sarcinii.
Faceți un program în Pascal, care găsește suma tuturor pătratelor de numere întregi într-un interval dat [a; b].
Soluția problemei în Pascal
Soluția problemei este împărțită în mai multe părți.
Inițial, trebuie să specificăm intervalul specificat. Dat fiind că avem numere întregi, limitele inițiale și finale trebuie să fie date ca întregi. Prin urmare, tipul de intrare este întreg. Variabilele a și b sunt necesare pentru a specifica limitele superioare și inferioare ale intervalului de întregi.
Folosind operatorul de intrare a valorii read1n (), intrăm în limitele inferioare și superioare ale intervalului.
Inițial, suma trebuie să fie forțată zero. Utilizând operatorul de atribuire: =
După aceasta, pentru a calcula suma necesară, trebuie să organizați un ciclu cu un pas incrementat de unul. Pentru aceasta, operatorul pentru buclă este utilizat în Pascal.
Codul Pascal al programului
Exemplu de introducere a datelor și rezultate în fereastra de ieșire
Introduceți valoarea limitei inferioare a intervalului a = -12
Introduceți valoarea limitei inferioare a intervalului b = 10
Suma pătratelor de numere în intervalul de la -12 la 10. S = 1035
Descărcați fișierul de cod al programului terminat
Sper că acest material vă va ajuta să înțelegeți mai bine limbajul de programare Pascal și să înțelegeți principiile generale de lucru cu programarea.
Articole similare
Trimiteți-le prietenilor: