Writeln(K); { Väljasta tulemus } End. { Põhiprogrammi lõpp. NB! Lõpus peab olema punkt! } Viiba esitamist keele Pascal standardses sisestusprotseduuris ei ole ette nähtud. Selleks tuleb kasutada väljastusprotseduuri abi. Sisestusprotseduur READ loeb sisendvoost üksteisele järgnevaid sümboleid ja ei arvesta nende paiknemist ridadel. See tähendab, et käsk READ(A,B,C), kus A, B ja C on täisarvutüüpi muutujad, loeb ühesuguse tulemusega mõlemaid sisestusvariante: 1) Programmeerimise algkursus 31 - 89 12 569 -5 2) 12 569 -5 Sisestusprotseduur READLN loeb sisendvoost muutujatele vajalikud väärtused ja viib sisselugemise järjekorra edasi järgmisele "reale". Seega käsk READLN(A,B) loeb eelnevalt esitatud esimesest sisestusvariandist väärtused 12 ja 569 ning jätab väärtuse -5 tähelepanuta.
End. { Põhiprogrammi lõpp. NB! Lõpus peab olema punkt! } 36 / 115 Viiba esitamist keele Pascal standardses sisestusprotseduuris ei ole ette nähtud. Selleks tuleb kasutada väljastusprotseduuri abi. Sisestusprotseduur READ loeb sisendvoost üksteisele järgnevaid sümboleid ja ei arvesta nende paiknemist ridadel. See tähendab, et käsk READ(A,B,C), kus A, B ja C on täisarvutüüpi muutujad, loeb ühesuguse tulemusega mõlemaid sisestusvariante: 1) 12 569 -5 2) 12 569 -5 Sisestusprotseduur READLN loeb sisendvoost muutujatele vajalikud väärtused ja viib sisselugemise järjekorra edasi järgmisele "reale". Seega käsk READLN(A,B) loeb eelnevalt esitatud esimesest sisestusvariandist väärtused 12 ja 569 ning jätab väärtuse -5 tähelepanuta. Teises sisestusvariandis lõpetab see käsk andmete sisestamise enne väärtuse -5 sisestama hakkamist. Andmete sisestamine keeles C
annaabi.ee 
