|
| Какими будут значения переменных a и b после выполнения операторов:
a:=1; b:=1;
while a<=3 do
a:=a+1; b:=b+1; |
a=3 b=3
a=3 b=2
a=4 b=2
a=4 b=4
|
|
| Во фрагмент алгоритма
p := 0;
For i := 1 To n Do
If _______ Then p := p + 1;
определяющий количество элементов последовательности, больших x, нужно вписать логическое выражение |
i < n;
A < x;
A > x;
A = x;
|
|
| Дана последовательность операторов:
a:=1; b:=1;
while a+b<8 do
begin
a:=a+1; b:=b+2; end;
s:=a+b;
Каким будет значение переменной s? |
11
8
7
9
|
|
| Чему равно значение переменной a после выполнения следующего оператора:
a:=25 div 4 - 16 mod 7; |
5
4
3
6
|
|
| Сколько раз будут выполнены инструкции между begin и end?
for i:=j to j+1 do
begin
…
end; |
3
2
1
0
|
|
| Результат вычисления какого из приведённых ниже выражений является решением следующей задачи: для целого числа n, где определить третью справа цифру в записи числа. |
(n/100);
((n/1000)*10);
((n mod 1000) div 100);
(n div 1000 mod 10);
|
|
| Определить результат выполнения следующей программы, если a=2, b=5?
program zadanie1;
var a, b, c: real;
begin
writeln(‘Введите числа a и b’);
read(a,b);
a: = a+2;
b: = b-4;
c: = a+b;
write(c);
end. |
2
3
4
5
|
|
| Найдите значение логического выражения
(А>B+С) or (C+D=A-2) and not (B<>D), если A=3, B=2, C=-5, D=6. |
true
false
1
2
|
|
| Определите значение переменной s после выполнения следующих операторов:
s: =0; n:=5;
for i: =1 to n do
begin
s:= s +10 Div i;
end; |
2
20
2,5
22
|
|
| Фрагмент программы
Begin Write('Введите N: '); ReadLn(N);
Write('Введите X: '); ReadLn(X);
А := X; В := X;
For I := 2 То N Do
Begin Write('Введите X: ');
ReadLn(X);
If X > В then В := X
Else if X < A then A := X
End;
WriteLn(B - A) ;
решает следующую задачу: |
определяет минимальный элемент последовательности;
определяет максимальный элемент последовательности;
определяет разность между минимальным и мак¬симальным элементами последовательности;
определяет разность между максимальным и минимальным элементами. последовательности.
|
|