NEW
Font size
Worksheetsистория
Total questions: 21
Worksheet time: 11mins
Var A,B :Integer ;C:Real;
X:Boolean
айнымалыларды сипатталган болса,төмендегі операторлардың қайсысы дұрыс емес
C:A+B+4,1;
X:A=B;
X:A=C;
A:X;
C:A;
өрнекті есептеу кезіндегі жауаптардың дұры вариантын таңдаңыз? [5..9,17..20]*[8..18]-[8,9]
[7..9]
[15..20]
[17,18]
[5..9,19,20]
[5..9]
Қолдану нәтижесі жол строка болатын стандартты функцияны көрсетіңіз
POS
HIGH
LENGTH
VAL
CONCATE
Логикалық коньюнция оператор амалын анықтаңыз
and
or
not (or)
'concat'
дұрыс жауабы жоқ
Басы ,соңы қандай символдың көмегімен белгіленеді
ромб
тіктөртбұрыш
шеңбер
эллипс
параллеграмм
программа фрагментінің орындалу нәтижесін таңда
S:='abc*12*d'; St:="; i:=1;
while (s[i]<>'*'do
begin
St:=St+S[i]+S[i];
Inc (i);
End;
writeln (St);
abc *12
aabbcc1122dd
abc12d
aabbcc
abc
өрнектің мәнін есептеу керек
0 div 11+36 div 13- 4 mod 11
4
-1
2
-2
3
келесі қай нұсқаудың жазылу форматын береді ?
<айнымалы>:<өрнек>;
шартты нұсқауы
меншіктеу нұсқауы
таңдау нұсқауы
шартсыз көшу нұсқауы
көшу нұсқауы
программа фрагментінің орындалу нәтижесін таңдау
var
n,cod :integer;
begin
s:='3456';
val (s,n,cod);
writeln ('n=',n'cod=' ,cod );
s:='32.45';
val (s,n,cod);
writeln ('n=',n'cod=' ,cod );
n=3456 cod=0
n=0 cod =3
n=32.45 cod=0
n=0 cod=3
n=3456 cod=0
n=0 cod=3
n='3456' cod=0
n=0 cod= 3
n=3245 cod =0
n=0 cod =3
программа фрагментінің орындалу нәтижесін таңда
var
n:integer ;c,s : string;
begin
n:pos ('abc', 'abefabcdeabc');
writeln ('n=',n);
c: = copy ('abefabcdeabc',6,3);
writeln ('c=',c);
s:='abcd';
insert ('123',s,3);
writeln ('s=',s);
end;
n=5
C=bcd;
S=ab123cd
n=5
C=bcd ;
S=ab123cd
n=5
C=bcd;
S=123abcd
n=10
C=bcd
S=ab123cd
n=5
C=fabcde;
S=ab123cd
n=5
программаның орындалатын бөлігі қандай түйінді сөзбен басталады
VAR
CONST
LABEL
TYBE
BEGIN
ORD () функциясы-
аргументтің келесі мәнін
аргументтің мәнін қайтарады
аргумент мәнінің реттік номерін
ешқандай мән шығармайды
аргументтің алдынғы мәні
төмендегі әрекеттердің нәтижесінде с айнымалылардың мәні неге тең болады?
a:=4
b:=2
c:= a+b/2
1
3
16
6
5
false and True арасындағы қатынастардың қайсысы дұрыс
False=True
False >=True
False <=True
False >True
False <True
Нәтижесі неге тең ?
...var n :integer ;
begin n :=1000; writeln (n div 10); end.
0
10.00
1000
10
100
Компилятор -бұл
жинағыштың түрі
программалау тілі
операциялық жүйе
жоғары деңгейлі тілден машиналық тілге аударатын арнайы жүйелік программа
арнайы резидентті жүйелік драйвер
Қандй айнымалы атауы дұрыс жазылмағанa
a'
a453
aLfa
a2
ob3
Var N: integer ;X: Real;
айнымалылардың сипатталған болса,төмендегі операторлардың қайсысы дұрыс емес
Writeln (x:8:4).
ReadLn ('N?',N).
Read (x).
WriteLn ('N?,'N).
Wtite ('X:=',X).
a және b айнымалысының мәнін табыңыз : a:=17 div 5; b:=2div 5.
2 4;
7 0;
3 0;
4 2;
3 2 ;
Келесі операторлар орындалғасын S айнымалысының мәнін анықтаңыз:
S:=1; n:=1;
ForI:=2 to n do S:=S+1/I;
1.5
2.5
2
0.0
1.0
Текетегі әріптерден басқа символдарды жою керек және барлық кіші әріптерді сәйкес үлкен әріптермен ауыстыру керек.
for i:=1 to length (s) do
if (ord (s[i]>=97 ) and (ord (s [i] <=127)then
st := St+upcase (s[i])
Else
if (ord (s[i]>=65) and (ord (s[i] <=90 )then
St :=s[i]+St;
writeln (St);
for i:=1 to length (s) do
if (ord (s[i]>=97 ) and (ord (s [i] <=127)then
st := St+upcase (s[i])
Else
if (ord (s[i]>=65) or (ord (s[i] <=90 )then
St :=s[i]+St;
writeln (St);
for i:=1 to length (s) do
if (ord (s[i]>=97 ) and (ord (s [i] <=127)then
st := St+upcase (s[i])
Else
if (ord (s[i]>=65) and (ord (s[i] <=90 )then
St :=St +s[i];
writeln (st);
for i:=1 to length (s) do
if (ord (s[i]>=97 ) and (ord (s [i] <=127)then
St := upcase (s[i])
Else
if (ord (s[i]>=65) and (ord (s[i] <=90 )then
St :s[i];
writeln (st);
for i:=1 to length (s) do
if (ord (s[i]>=97 ) and (ord (s [i] <=127)then
St := St+upcase (s[i])
Else
if (ord (s[i]>=65) and (ord (s[i] <=90 )then
St :=St +s[i];
writeln (st);
