Vienkārša datu ievade un apstrāde — teorija. Programmēšana, Programmēšanas pamati.

Vienkārša programma ar ievadīto datu apstrādi

Svarīgi!

Programmas mērķis:
1) Palūgt lietotājam ievadīt divus veselus skaitļus (un saglabāt to vērtības divos mainīgajos).
2) Izvadīt šo skaitļu summu un starpību.
3) Aizvietot pirmo mainīgo (skaitli) ar iegūto summu un otro mainīgo (skaitli) - ar starpību, pēc tam izvadot jaunās vērtības.

Mainīgo nodefinēšana

Lietotājs ievadīs divus veselus skaitļus - tātad jānodefinē divi mainīgie. Par to tipu var ņemt, piemēram, integer (jo tie ir veseli skaitļi). Nosaukumi būs PirmaisSkaitlis un OtraisSkaitlis.

Un arī summas un starpības glabāšanai jānodefinē mainīgie - Summa un Starpiiba (arī ar integer tipu).

\begin{array}{l} var PirmaisSkaitlis, OtraisSkaitlis : integer; \\ Summa, Starpiiba : integer; \end{array}

Abu skaitļu ievade

\begin{array}{l} write (' Ievadi pirmo skaitli :'); \\ readln (PirmaisSkaitlis); \\ write (' Ievadi otro skaitli :'); \\ readln (OtraisSkaitlis); \end{array}

Vispirms tiek izvadīts paziņojums par konkrētā mainīgā ievadi (ar write), pēc tam notiek pats ievades process (ar readln). Un tā ar abiem skaitļiem.

Šis ir tikai viens no iespējamajiem variantiem.

Vēl viena iespēja - paprasīt uzreiz abu skaitļu ievadi:

\begin{array}{l} write (' Ievadi abus skaitljus :'); \\ readln (PirmaisSkaitlis, OtraisSkaitlis); \end{array}

Summas un starpības aprēķināšana un izvade

Jaunas vērtības mainīgajiem piešķir ar :=. Saskaitīšanai un atņemšanai izmanto pierastos simbolus + un -.

Mainīgajam Summa piešķir izteiksmes PirmaisSkaitlis+OtraisSkaitlis vērtību. Līdzīgi aprēķina vērtību mainīgajam Starpiiba. Un pēc tam izvada vērtības kopā ar paskaidrojošu tekstu.

\begin{array}{l} Summa := PirmaisSkaitlis + OtraisSkaitlis; \\ Starpiiba := PirmaisSkaitlis - OtraisSkaitlis; \\ writeln (' Sjo skaitlju summa ir', Summa); \\ writeln (' Sjo skaitlju starpiiba ir', Starpiiba); \end{array}

Vērtību nomainīšana

Tad aizvieto mainīgos: pirmo mainīgo (PirmaisSkaitlis) ar iegūto summu (Summa) un otro mainīgo (OtraisSkaitlis) - ar starpību (Starpiiba). Un tad izvadam jaunās vērtības.

\begin{array}{l} PirmaisSkaitlis := Summa; \\ OtraisSkaitlis := Starpiiba; \\ writeln (' Jaunaas veertiibas ir', PirmaisSkaitlis,' un', OtraisSkaitlis); \end{array}

Rezultāts

Saliekot to visu kopā, sanāk šāda programma:

\begin{array}{l} program piemeers2; \\ uses crt; \\ var PirmaisSkaitlis, OtraisSkaitlis : integer; \\ Summa, Starpiiba : integer; \\ begin \\ clrscr; \\ {Abu skaitļu ievade} \\ write (' Ievadi pirmo skaitli :'); \\ readln (PirmaisSkaitlis); \\ write (' Ievadi otro skaitli :'); \\ readln (OtraisSkaitlis); \\ {Summas un starpības aprēķināšana un izvade} \\ Summa := PirmaisSkaitlis + OtraisSkaitlis; \\ Starpiiba := PirmaisSkaitlis - OtraisSkaitlis; \\ writeln (' Sjo skaitlju summa ir', Summa); \\ writeln (' Sjo skaitlju starpiiba ir', Starpiiba); \\ {Jauno vērtību piešķiršana un izvadīšana} \\ PirmaisSkaitlis := Summa; \\ OtraisSkaitlis := Starpiiba; \\ writeln (' Jaunaas veertiibas ir', PirmaisSkaitlis,' un', OtraisSkaitlis); \\ readkey; \\ end . \end{array}

Iepriekšējā teorija

Atgriezties tēmā

Nākamā teorija

Nosūtīt atsauksmi

Atradi kļūdu?

Sūti mums ziņu!

2. Vienkārša datu ievade un apstrāde

Teorija