kujul (eesti keeles):,,Kui mingid tingimus on täidetud, siis täida see käsk. Kui esimene tingimus pole täidetud, siis käitu selle teise tingimuse korral nii. Kui teine tingimus pole ka täidetud, siis käitu nii". PHPs on kood umbes nii üles ehitatud. Peaaegu iga sammu järel käib lisavõimaluste juurde lisamine. Eelnev eesti keelne näide näeb PHP koodis välja selline: if (tingimus) käsklus/ülesanne, mis tuleb läbi viia, kui tingimus on täidetud; elseif (tingimus) käsklus/ülesanne, mis tuleb läbi viia, kui tingimus on täidetud; else käsklus/ülesanne, mis tuleb läbi viia, kui tingimus ei ole täidetud; Sellise koodi struktuuriga saab luua näiteks sellise väikese käskluse: $d=date("D"); if ($d=="Fri") echo "Head nädalalõppu!"; elseif ($d=="Mon") echo "Head esmaspäeva!"; else echo "Head päeva!";
Vormingufunktsioon Format Alamprogrammid Private/Public Sub nimi(argumendid) programmi algoritm End Sub Väljakutsumine nimi argumendid Funktsioonid Function nimi(parameetrid) [As andmetüüp] funktsiooni algoritm nimi=avaldis End Function Keelestruktuurid Valikud 1. If tingimus Then tegevus 2. If tingimus Then tegevus(ed) End If 3. If tingimus1 Then tegevus(ed)1 ElseIf tingimus2 Then ... Else ... End If Kordused 1. Do While tingimus korduv tegevus Loop 2. For muutuja=algväärtus To lõppväärtus [Step samm] korduv tegevus Next muutuja 3. For Each muutuja In hulk/massiiv korduv tegevus Next muutuja Suunamised Ploki/programmi lõppu Exit For, Exit Do, Exit Sub, Exit Function Märgendile GoTo märgend
As String) As String Funktsioon saab väärtuseks "mees", kui koodi esimeseks sümboliks on 1,3,4; "naine" - kui esimeseks sümboliks on 2,5,6. Kui isikukoodi pikkus ei ole 11, kõik sümbolid ei ole numbrid või esimene sümbol ei ole ükski eelpool loetletuist, saab funktsioon väärtuseks "viga!". Lahendus: Function Sugu(ikood As String) As String If IsNumeric(ikood) And (Len(ikood) = 11) And (Mid(ikood, 1, 1) = "1") Or (Mid(ikood, 1, 1) = "3") Or (Mid(ikood, 1, 1) = "4") Then Sugu = "mees" ElseIf IsNumeric(ikood) And (Len(ikood) = 11) And (Mid(ikood, 1, 1) = "2") Or (Mid(ikood, 1, 1) = "5") Or (Mid(ikood, 1, 1) = "6") Then Sugu = "naine" Else: Sugu = "viga!" End If End Function3 . Kirjuta Sub-protseduur (makro), mis küsib kasutaja käest täisarvude vahemiku ning leiab nende summa: Sub ArvudSumma() Näiteks, kui vahemik on 1-5, on summa 1+2+3+4+5=15 Summat näidatakse kasutajale Lahendus:Sub ArvudSumma() Dim i As Integer Dim sum As Integer Dim l As Integer Dim u As Integer
peaökonomist ökonomist Function If Function F_nimi ( [ ] ) If t Then _1 [ Else [ Const ] [ Dim ] If- ( ) F_nimi = If Then End Function _1 [ Else _2 ] End If If- - If _1 Then _1 _1 ElseIf _2 Then _2 _2 _1 ... ElseIf _n Then _n _2 _n Else _E _n _E End If Select Case [-1] [] Select Case { Case -k [ -k ] } [-2] [-n] [ Case Else [ ] ] -1 -2 ... -n End Select If
”); } else { Console.WriteLine(“ i больше или равно 1! ”); } • Результат • i больше или равно 1! Пример • int i = 1; if(i == 10){ Console.WriteLine(“истина!”); } • Этот блок ничего не выведет на экран. • Рассмотрим второй вид оператора, его суть просто в добавлении любого количество блоков elseif к конструкции if .. else: • if (выражение1) оператор1; [else if (выражение2) оператор2;] ... • [else if (выражениеN) операторN;] [else операторM;] Проверка нескольких условий • &&-"и", || "или". • if (vanus > 6 && vanus <= 14) • Console.WriteLine("Sinu jaoks on lapsepilet"); • if (vanus < 7 || vanus > 14) • Console.WriteLine("Sulle lapsepilet ei sobi"); Пример
Mitmerealine If-lause võrdlus : avaldis - üldjuht :avaldis: võrdlustehe mitmene x =valik 0, D >= 0, 2 * 3 + 5 > a - 3 loogikaavaldis: võrdlus loogikatehe võrdlus [loogikatehe võrdlus ] ... If ting_1loogikatehted: Then Or, And, ... x >= vs And x <= px; a >= b + c Or b >= a + c Or c >= a + b if-laused [ ElseIf ting_K Then elseif-laused ]. ... [ Else else-laused_E ] End If Üherealine If-lause If tingimus Then laused_1 [ Else laused_2 ] If a > b Then max = a Kolme arvu med Üldmoodulis Valikud on funktsioon Maks0 (Variant 0)
tingimus - võrdlus või loogikaavaldis , väärtuseks tõeväärtus True või False ... võrdlus : avaldis võrdlustehe avaldis: x = 0, D >= 0, 2 * 3 + 5 > a - 3 loogikaavaldis: võrdlus loogukatehe võrdlus [loogikatehe võrdlus ] ... loogikatehted: Or, And, ... x >= vs And x <= px; a >= b + c Or b >= a + c Or c >= a + b Mitmerealine If-lause - üldjuht : mitmene valik If ting_1 Then if-laused [ ElseIf ting_K Then elseif-laused ]. ... [ Else else-laused_E ] End If Üherealine If-lause If tingimus Then laused_1 [ Else laused_2 ] If a > b Then max = a Else Kolme arvu mediaan Üldmoodulis Valikud on funktsioon Maks0 (Variant 0) Koostada funktsioonid max leidmiseks
tingimus - võrdlus või loogikaavaldis, väärtuseks tõeväärtus True või False ... võrdlus : avaldis võrdlustehe avaldis: x = 0, D >= 0, 2 * 3 + 5 > a - 3 loogikaavaldis: võrdlus loogikatehe võrdlus [loogikatehe võrdlus ] ... loogikatehted: Or, And, ... x >= vs And x <= px; a >= b + c Or b >= a + c Or c >= a + b Mitmerealine If-lause - üldjuht : mitmene valik If ting_1 Then if-laused [ ElseIf ting_K Then elseif-laused ]. ... [ Else else-laused_E ] End If Üherealine If-lause If tingimus Then laused_1 [ Else laused_2 ] If a > b Then max = a Else Kolme arvu mediaan Üldmoodulis Valikud on funktsioon Maks0 (Variant 0) Koostada funktsioonid max leidmiseks
LCase, UCase Matemaatikafunktsioonid Abs, Sqr, Int, Fix, Exp, Log Rnd trigonomeetria Finantsfunktsioonid FV, Pmt, Rate SLN, SYD, DDB Massiiv Array LBound, UBound Failifunktsioonid EOF,LOF, FileLen, FileDateTime CurDir Input, Seek Värvid RGB, QBColor Dialoog InputBox, MsgBox Keelestruktuurid Valikud * If tingimus Then tegevus * If tingimus Then tegevus(ed) End If * If tingimus1 Then tegevus(ed)1 ElseIf tingimus2 Then ... End If Select Case avaldis Case väärtus1 tegevus(ed)1 Case väärtus2 ... End Select Kordused Do While tingimus Do korduv tegevus korduv tegevus Loop Loop While tingimus Do Until tingimus Do korduv tegevus korduv tegevus Loop Loop Until tingimus
IF-lause If tingimus Then laused_1 [Else laused_2] Select Case lause (täitmisele kuuluvad laused valitakse ühe suuruse (selektori) väärtuse alusel) IF-plokk If tingimus1 Then Select Case selektor lause(d) { Case kriteerium-k { ElseIf tingimusK Then laused-k } - 1 või suvaline arv kordi lause(d) } - 0 või suvaline arv kordi [ Case Else [ Else [ laused ] ] - 0 või 1 korda lause(d) ] - 0 või 1 End Select
' liigaasta'; ?> Tingimus tingimuse sees Mõnikord tuleb kasuks see asjaolu, et tingimuslause on käsk nagu iga teinegi ja seega seda võib kasutada ka teise tingimuslause sees. Kirjutame liigaasta probleemi lahendus üle: Näide If-elseif-else konstruktsioon Juhul, kui programmis on vaja mitu tingimust kontrollida, siis PHP-s on olemas if-elseif-else tingimuslause konstruktsioon (else võib ka siin puududa): if (tingimus1) { plokk1 } elseif (tingimus2) { plokk2 } elseif (tingimus3) { plokk3 } else { plokk4 } Kui tingimus1 on väär, siis minnakse järgmise juurde (tingimus2) kui mingi tingimus kehtib siis täidetakse vastav koodi plokk ja järmisi tingimusi arvuti ei kontrolli
'; 9 10 } 11 ?> 12 Ülesanne 4 1. Kõik ülesanded on varustatud kommentaaridega 2. Jagamine - sisestatakse 2 täisarvulist muutujat. Jaga üks arv teisega. Väljasta ka hoiatav lause, kui kasutaja üritab jagada nulliga. Lisa kontroll, mis ei käivita koodi tühjade lahtrite puhul (N: if(! empty($_GET['name'])){lause}, see käivitab koodi siis, kui lahtrisse on midagi lisatud) 3. Suurem/väiksem (if...elseif) - sisestatakse 2 täisarvulist muutujat. Leia kumb arv on suurem või on need võrdsed. Lisa kontroll, mis ei käivita koodi tühjade lahtrite puhul. 4. Juubel - kasutaja lisab sünniaasta ning kood väljastab, kas tegemist on juubeliaastaga. Lisa kontroll, mis ei käivita koodi tühjade lahtrite puhul. 5. Arvamismäng (switch) - kasutaja üritab ära arvata arvu. Et tal oleks lihtsam arvata, siis anna vihje, kas lisatud arv on liiga suur või väike
Shapes("kast") [sees] = 0: [puude] = 0 Do p.Left = [J_plats].Left + Rnd * [J_plats].Width p.Top = [J_plats].Top + Rnd * [J_plats].Height If On_Sees(p, kast) Then [sees] = [sees] + 1 [J_plats].Interior.ColorIndex = Rnd() * 50 paus 1 ElseIf On_Puude(p, kast) Then [puude] = [puude] + 1 kast.Fill.ForeColor.SchemeColor = 70 * Rnd() paus 1 End If paus 0.5 Loop End Sub red() hiir As Shape, Kraps As Shape, plats As r = Shapes("hiir"): Set Kraps = "Kraps") ats = Range("plats") e("käes") = 0 Left = plats.Left + Rnd * (plats.Width - h) Top = plats.Top + Rnd * (plats.Height - ght)
}
else
46 / 115
if (N == 3)
{
printf("Palun sisesta protsendi väärtus : ");
scanf("%f", &M);
printf("Palun sisesta osa väärtus : ");
scanf("%f", &O);
printf("Terviku väärtus on %.1fn", O/M*100);
}
} /* main */
Tingimuslause keeles Qbasic
Tingimuslause süntaks:
'IF'
установить любой тип .NET: array, bool, byte, char, char[], decimal, double, float, int, int[], long, long[], regex, single, scriptblock, string, type, xml. Он определяется в квадратных скобках в момент присваивания: MSH> $var = [int]10; В сценариях можно использовать условные операторы if-elseif- else, switch, а также операторы циклов while, do-while, do-until, foreach. Мы рассмотрим только оператор if-elseif-else и циклы while и foreach. Конструкция if-elseif-else следующая: if (условие) {операторы } elseif (условие) {операторы ... } elseif (условие) {операторы } else {операторы} Условие задается так:
annaabi.ee 
