< > => <ңғ ә> қ.
ұ : құ . ә n қ:
:
PROGRAM PRIM;
VAR X, k,n: integer;
F, P: real;
BEGIN
WRITELN(X-;ә n- ң);
READ(X, n);
F:=1;
P:=1;
FOR k:=1 to n do
Begin
F:=F*k;
P:=P*(1+SIN (k*X)/F);
End;
WRITELN(ң ә ғ);
WRITELN(P= ,P:6:3,F=, F:6:3)
END.
dz ә
WHILE <> DO <ң >
ӘDz <> <ң >
WHILE,DO ү ө.
ә қ <> . <> TRUE (қ) ғ ғ < > ә қ. <> ғ FALSE (ғ) , < > ң ғ.
REPEAT
<ң >
UNTIL <>;
Қ <ң > ɲ <>
Lt;ң > ң ғ , <> қ, ә FALSE (ғ) , < > қ, ғ ө ұ қ.
ұ : құ . Қ e = 10-6 ә құң. қң ә ғ ғ ә ң.
қ ң:
:
PROGRAM PRSUM;
VAR X, S: REAL; K: INTEGER;
BEGIN
WRITELN( X e);
READ(X, e);
S:=0; K:=1;
REPEAT
S:=S+(sqr(X)+1)/(sqr(sqr(K))+K*sqrt(abs(sqr(X)*X+1))+1);
K:=K+1;
UNTIL ABS(AK) < e;
WRITELN(S = , S:7:3)
END.
қ ұқ
ң - құ ә n қ ү . ү , ә ә қ.
:
1. 2.
3. 4.
5. 6.
7. 8.
9. 10. .
қ ұ
ө .
ұң қ: ә құ қ ү.
ң .
|
|
ұ , ң қ ө.
:
TYPE <ң > ARRAY [< 1>,...,< N> ]
OF <ң >
ң N ө ң ө . ө .
VAR A: ARRAY [1..N] OF REAL;
ұ қ ұ ө өң қ. ө ә ғ ө.
FOR I:=1 TO N DO READ(A[I]);
ұ N , ң .
(N ң CONST ұқ ө ).
ү ғ:
FOR I:=1 TO N DO WRITE(A[I]);
ұ : (10) ө құң.
:
PROGRAM SORMASS;
CONST N=10;
VAR A: ARRAY[1..N] OF INTEGER;
I, L, C: INTEGER;
BEGIN
WRITELN( ң); { }
FOR I:=1 TO N DO READ(A[I]);
FOR I:=1 TO N-1 DO { }
FOR L:=I+1 TO N DO
IF A[I]>A[L] THEN
BEGIN
C:=A[I]; A[I]:=A[L]; A[L]:=C;
END;
FOR I:=1 TO N DO
WRITE(A[I]:3); { ғ}
END.