Vairāku gadījumu aplūkošana — teorija. Programmēšana, Programmēšanas pamati.

Vienkārša programma ar dažādu gadījumu aplūkošanu

(Pirmās pakāpes vienādojums)

Svarīgi!

Programmas mērķis:

1) Palūgt lietotājam ievadīt koeficientus a un b (kā reālus skaitļus).

2) Izvadīt informāciju par lineārā vienādojuma ax=b risinājumu.

Nepieciešamie mainīgie un to ievade

Jābūt definētiem dieviem mainīgajiem, kuros glabāt koeficientu a un b vērtības.

var A, B : real;

Kā arī jāpalūdz lietotājam ievadīt vērtības.

\begin{array}{l} write (' Ievadi koeficientu A :'); \\ readln (A); \\ write (' Ievadi koeficientu B :'); \\ readln (B); \end{array}

Visu gadījumu aplūkošana

Ja a atšķiras no 0, tad ir tikai viens risinājums:

\frac{b}{a}

Ja a neatšķiras no 0:

a) ja b ir 0, tad ir bezgalīgi daudz risinājumu;

b) ja b nav 0, tad atrisinājums neeksistē.

Programmas kodā tas izskatās šādi:

\begin{array}{l} if (A < > 0) then \\ writeln (' Atbilde ir', B / A : 0 : 4) {4 cipari aiz komata} \\ else \\ if (B = 0) then \\ writeln (' Ir bezgaliigi daudz risinaajumu') \\ else \\ writeln (' Risinaajums neeksistee'); \end{array}

Rezultāts

To visu saliekot kopā, sanāk šāda programma:

\begin{array}{l} program piemeers3; \\ uses crt; \\ var A, B : real; \\ begin \\ clrscr; \\ {Koeficientu ievade} \\ write (' Ievadi koeficientu A :'); \\ readln (A); \\ write (' Ievadi koeficientu B :'); \\ readln (B); \\ {Atbilstosjaas atbildes izvade} \\ if (A < > 0) then \\ writeln (' Atbilde ir', B / A : 0 : 4) {4 cipari aiz komata} \\ else \\ if (B = 0) then \\ writeln (' Ir bezgaliigi daudz risinaajumu') \\ else \\ writeln (' Risinaajums neeksistee'); \\ readkey; \\ end . \end{array}

Atradi kļūdu?

4. Vairāku gadījumu aplūkošana