Айнымалылар бөлімі.
Айнымалыны сипаттау бөлімінің құрылымы төмендегіше болады:
Var айнымалының аты: типтің аты;
(variable-айнымалы). Бірдей типті айнымалылар үтір қойылып жазылады.
Мысал: Var a, b, c: integer;
x,y: real;
text1: string;
Енгізу және шығару операторы
2.1. Енгізу операторы
Енгiзу операторлары есеп шығаруға қажеттi берiлген мәлiметтердi пернетақтадан енгiзу үшiн қолданылады.
Жазылу үлгiсi:
READ (x);
READ (A,B,C);
READLN(X1,X2);
Мұндағы, READ - оператордың аты, ағылшынша “оқу” деген ұғымды бередi, ал одан кейiн жақша iшiнде – енгiзiлетiн айнымалылардың атаулары берiледi. Алғашқы 2 оператор айнымалылардың мәндерi пернетақтадан енгiзiлген соң, курсорды келесi қатарға көшiрмейдi.
Ал READLN ( READ LINE –“жолды оқу” деген сөздiң қысқартылуы ) пернетақтадан мәндер енгiзiлгеннен кейiн курсор келесi қатарға көшiп кетедi.
Енгiзiлген айнымалының мәндерi INTEGER, REAL, CHAR типтерiне жатуы мүмкiн. Мысалдар.
1-мысал: Радиусы R-ге тең шеңбер берiлген. Шеңбердiң ұзындығын есептеу программасын құр.
RPOGRAM Шеңбер;
CONST PI =3.14159; { тұрақты санын сипаттау.}
VAR L: REAL; { Шеңбердiң ұзындығы L нақты сан}
R: INTEGER; { радиус R - бүтiн сан}
BEGIN
WRITELN (‘Шеңбердiң радиусы R-дi енгiз”);
READ(R); { R-дi енгiзу. }
L:=2*Pi*R; {L-дi есептейдi}
WRITELN(‘L=’,L:4:2); {L-дi жауапқа шығару}
END.
Достарыңызбен бөлісу: |