- •Var X,y,p:integer;
- •Var a,b,c,d:byte;
- •Var a,b,c:byte;
- •If и case
- •Var a,b:real;
- •Int(X) функциясы:
- •Var I, j, s : integer;
- •Var b: array [1..10] of real;
- •Var w:array[ 7..10,3..5] of real; түрінде сипатталған массивтің неше элементі бар?
- •InitGraph
- •I ретті дифференциалдық теңдеу
- •Internet таралған маршрутизация
- •Iшкi шлюздiң хаттамасы unix басқару жүйелерiндегi бағдарлама ненің көмегiмен жүзеге асырады?
- •Xerox Network System
- •Iso Transport Service Definition
- •«Дифференциалдық теңдеулер» пәні
- •«Аналитикалық геометрия» пәні
«Программалау» пәні
Қай өрнектің мәні дұрыс емес?
18 div 4 =2
Стандартты скаляр типке жатпайтын типті көрсетіңіз:
интервалдық.
Қай тип нақты типке жатпайды?
Word
Қолданушы анықтайтын тұрақтыны сипаттау бөліміне сәйкес қызметші сөз:
Const
Мына өрнектің Pascal тілінде дұрыс жазылған нұсқасын таңдаңыз:
(–b+sqrt(sqr(a)–4*a*c))/(2*a)
Var X,y,p:integer;
Begin
Readln(X); Readln(Y);
If X>= Y then P:=X else P:=Y;
Writeln ('P=', P);
End.
X=15, Y=16 болғанда программаның орындалуы нәтижесінде экранға не шығады?
P=16
Var a,b,c,d:byte;
Begin
Readln(A,B,C,D);
If A>B then BEGIN
If C>D then begin B:=D; C:=A; End
Else begin C:=D; A:=C END; END;
Writeln(A,B,C,D)
End.
A=15, B=9, C=4, D=6 болғанда программаның орындалу барысында қандай нәтиже алынады?
6966
Var a,b,c:byte;
Begin
Readln(A,B,C);
If (A>B) and (A>C) then A:=B+C;
Writeln(A);
End.
A=25,B=10, C=5 болғанда программаның орындалу барысында қандай нәтиже алынады?
15
…
Begin
Readln(A,B);
If A>B then A:=Sqrt(B) else B:=Sqrt(A);
Writeln('A=',A,' B=',B);
End.
A=25,B=81 болғанда программа фрагментінің орындалу барысында қандай нәтиже алынады?
A=25 B=5.
ТР тіліндегі қайталау операторлары:
while, repeat, for
ТР тіліндегі шартты көшу операторлары:
If и case
Var a,b:real;
Begin
A:=12.55566;
Writeln(‘A=’,A:6:3);
Программалық жолдары орындалғанда экранға шығарылатын дұрыс жауапты көрсетіңіз:
B= 12.556
Жазба өрістерін қолдану барысында жазба идентификаторын қайталап жазбау мақсатында қолданылатын оператор қандай?
With do
Int(X) функциясы:
х санын жақын кіші бүтін санға дөңгелектейді.
[100..150]*[122..200,201] = ?
[122..150]
[100..200]-[122..200,201] = ?
[1..121]
Қай процедура цикл жұмысын уақытынан бұрын аяқтауға мүмкіндік береді?
Break
Реттік айнымалыға арналған қай процедура немесе функция аргументтің тақ-жұптығын тексереді?
ODD
Қай процедура немесе функция аргументтің жадыдан алатын орынының мөлшерін анықтайды?
Sizeof
Crt модуліндегі қай процедура немесе функция клавиатурадан енгізілген символды оқиды?
ReadKey
Crt модуліндегі қай процедура немесе функция курсорды экранның көрсетілген координаталы позициясына қояды?
GotoXY
Белгілерді сипаттау блогы қай қызметші сөзден басталады?
Label
Қатесі бар жауапты табыңыз:
Паскаль тілінде бір жолға бірнеше операторларды жазуға болмайды.
Қай өрнектің мәні дұрыс емес?
17 div 5 = 1
Келесі программаның орындалу нәтижесінде экранға шығарылатын жауапты таңдаңыз: const A : array [1..2, 1..2] of integer = ((11,12), (21, 22));
Var I, j, s : integer;
begin
for j :=1 to 2 do begin S:=0;
for i :=1 to 2 do S :=S + A[i, j];
Write(S, ‘ ‘);
End; End.
32 34
K:=0;
For i:=1 to n do
For j:=1 to n do
If A[I, J]>0 then k:=k+1;
Writeln(k);
Программаның бөлігі орындалуының нәтижесінде не аламыз?
Оң элементтердің санын
K:=0;
For i:=1 to n do
For j:=1 to n do
If A[I, J]>0 then k:=k+a[i,j];
Writeln(k);
Программаның бөлігі орындалуының нәтижесінде не аламыз?
Оң элементтердің қосындысын
Массив дегеніміз –
бір атпен аталған, әр түрлі индексті, бір типті элементтердің жиынтығынан тұратын мәліметтердің құрылымы.
Нақты типті 10 элементтен тұратын В массивінің дұрыс сипатталуын көрсетіңіз:
Var b: array [1..10] of real;
S:=0; x:=2;
for i:=1 to 2 do begin
x:=x*i;
S:=S+sqr(x);
End;
Жолдары орындалғанда S неге тең болады?
20
Төмендегі жолдар орындалғанда S неге тең болады?
S:=0; x:=2; for i:=1 to 3 do x:=x*i; S:=х;
12
