96
SQNUM : q NUM * NUM;
Paskalda darajaga oshirish amali bo’lmagan uchun, uni
sonlarni uzini - uziga
ko’paytirish bilan almashtiramiz.
Paskal tilida ma’lumotlarni bosib chiqarishda chiqarish operatori ishlatiladi.
CHiqarish operatori WITE so’zidan boshlanadi,
undan keyin qavslar ichida
chiqazilaetgan kattaliklar ro’yxati keladi.
Misol Write (NUM, SQNUM)
Bosib chiqariladigan ma’lumotlarning joylashishining o’zgartirish, ya’ni yangi
satrdan boshlash uchun dasturga
writeln
operatorini kiritish kerak
Writeln (NUM, SQNUM)
Dasturda takrorlanish jaraenini tashkil etish uchun tsikl operatori ishlatiladi:
For NUM : q 4 to 9 do
TSikl sarlavhasi for so’zidan boshlanadi, undan keyin o’zgaruvchi nomi hamda
uning tsikl bajariladigan qiymatlarning boshlang’ich va oxirgi qiymatlari keladi.
NUM o’zgaruvchining qiymati 4 dan 9 gacha (1 qadami bilan) o’zgaradi. Agar tsiklda
bir nechta operatorlarni bajarish kerak bulsa, ularni murakkab operatorga birlashtirish
kerak.
Butun dasturning ko’rinishi quyidagicha buladi.
Program prov1;
Var
NUM, SQNUM : integer;
begin for Num : q 4 TO 9 DO
begin
SQNUM : q NUM * NUM;
Writeln (NUM, SQNUM)
END END.
Paskal’ tilida END operatorining oldida nuqta - vergul qo’yilmaydi.
