Informatika va programmalash

1-misol:
var A,B,C: real;
K,N: byte;
...
Read(A,B,C,K,N);{0.5 1.6 -19.1 6 4}

Kiritish protsedurasi mantiqiy tipga tegishli Eoln funksiyasi bilan bog‘langan: Ma’lumki, Eoln funksiya satr elementlarini kiritish tugaganda true, aks holda false qiymatini qabul qiladi.

2-misol:
Var K,I: integer;
...
Readln; I:=0;
while not Eoln do
begin
Read(K);
I:=I+1
end;
K ga butun qiymatlar kiritiladi va ularning soni hisoblanadi. Bu sikl satrning oxiri Enter klavishasi uchraguncha davom ettiriladi.
Masalan: 4 5 13 14 Enter
Output standart matnli fayliga chiqarish write, writeln chiqarish protseduralari yordamida bajariladi.
write(x1,x2,. . . ,xn) ko‘rinishidagi operator quyidagi operatorlar ketma-ketligiga ekvivalent
write(x1), write(x2),. . . ,write(xn);
bu yerda har bir operatorda faqat bitta element chiqarilayapti. Shuning uchun, biz faqat write(x) ko‘rinishidagi operatorni ko‘ramiz.
Chiqarilayotgan element quyidagi uch ko‘rinishdan bittasi bo‘lishi mumkin:
e
e:m
e:m:n
bu yerda e - ifoda (char, real, integer yoki boolean turdagi), satrli o‘zgarmas yoki satrli o‘zgaruvchi, m va n esa musbat butun qiymat qabul qiladigan ifodalar.
Ma’lumotlarni satrlar bo‘yicha joylashtirish uchun writeln(yangi satrga o‘tish) yoki writeln(x1, x2,...,xn) (chiqarish va yangi satrga o‘tish) protseduralardan foydalanamiz.
3-misol:
var A, B: real;
I, N: integer;
C: char;
...
I: =0; N: =I+1;
A: =0.25; B: =Sqrt(A); C: =’#’;
Writeln(I,’ ’,N); { 0 1}
Writeln(A,B); { 2.5000000000E-01 5.0000000000E-01}
Writeln(A,Sqrt(A)); { 2.5000000000E-01 5.0000000000E-01}
Writeln(N+5,C); { 6#}
Write(MaxInt);{32767- integer turidagi maksimal butun son }