Какое число будет выведено на экран в результате выполнения следующего фрагмента программы (предполагается, что все используемые переменные – целые числа)?
a[1]:=0;
for i:=2 to 10 do
a[i]:=a[i-1]+i;
writeln(a[4]);
(В ответ введите число)
Какой текст будет выведен на экран в результате выполнения следующего фрагмента программы?
s:=’Example’;s0:=’ABC’;
Delete(s,4,3);
writeln(s);
Какое число будет выведено на экран в результате выполнения следующей программы?
var
a,b,c:integer;
procedure sub;
var
a,c:integer;
begin
a:=3; b:=5;
end;
begin
a:=1; b:=2;
sub;
writeln(a+b);
end.
Чему будет равно значение переменной s после выполнения следующей последовательности операторов?
s:=0; i:=0;
repeat
s:=s+2*i;
i:=i+3;
until s>10;
(В ответ введите число)
Какие из приведенных ниже ключевых слов и стандартных типов могу использоваться при описании скалярной переменной вещественного типа?
Какое число будет выведено на экран в результате выполнения следующей программы?
var
a,b,c:integer;
procedure sub(x:integer; var y:integer);
var
a,b,c:integer;
begin
a:=10; c:=20;
x:=30; y:=50;
end;
begin
a:=1; b:=2; c:=3;
sub(a,b);
writeln(a+b);
end.
7
Какое число будет выведено на экран в результате выполнения следующей программы?
var
j,i,s:integer;
a:array [1..4,1..4] of integer;
begin
s:=0;
for i:=1 to 4 do for j:=1 to 4 do
a[i,j]:=i+j;
for i:=1 to 4 do s:=s+a[3,i];
writeln(s);
end.
Чему будет равно значение переменной s после выполнения следующей последовательности операторов?
s:=0; i:=0;
while s< 10 do begin
s:=s+2*i;
i:=i+1;
end;
(В ответ введите число)
Чему будет равно значение переменной j после выполнения следующей последовательности операторов?
i:=7;
if abs(i-3)>2 then
j:=sqr(i+2) mod 5
else
j:= (i-3) div 3;
(В ответ введите число).
Чему будет равно значение переменной s после выполнения следующей последовательности операторов?
s:=7;
for i:=1 to 5 do
s:=s+2*i;
(В ответ введите число).