Тест
Линейные алгоритмы. Целочисленная арифметика
1. Какой результат получится после выполнения следующего алгоритма:
var n,k,d,b: real;beginn:=7;k:=3;d:=16;b:=(k+sqrt(d))*n;writeln(b);end.1250
16
30
49
2. Вычислите результат выполнения следующего алгоритма:
var n,k,d,b: real;beginn:=8;k:=4;d:=24;b:=(sqr(k)+4*n)/d;writeln(b);end.
3. Найдите значения следующих выражений:
25 div 8 =
17 div (30 mod 8) =
32 mod (14 div 6) =
4. Выберите верное равенство:
(1608 div 100) div 10 = 1608 div 10000
(264 mod 100) div 10 = (368 div 10) mod 10
(2574 mod 1000) div 100 = (2574 div 1000) mod 100
5. Какой результат будет выведен в процессе выполнения программы:
var n,n1,n2,n3,n4,sum:integer;beginn:=4682;n1:=n div 1000;n2:=(n div 100) mod 10;n3:=(n div 10) mod 10;n4:=n mod 10;sum:=n2+n3+n4;writeln(sum);end.
function
Transpose(a: array[,] of integer): array[,] of integer;
//Поворот на 90гр по часовой стрелке
begin
var m := Length(a, 0);
var n := Length(a, 1);
Result := new integer[n, m];
for var i := 0 to n-1 do begin
for var j := 0 to m-1 do
Result[i, j] := a[m-1-j, i];
end;
end;
begin
var n := ReadInteger('Введите n:');
//Заполнение матрицы NxN сл. числами и вывод на экран
var a :=MatrixRandom(n, n);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(a[i,j]);
println;
end;
println;
Println('поворот влево на 90 гр');
var b := Transpose(a);
b:=Transpose(b);
b:=Transpose(b);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(b[i,j]);
println;
end;
println;
Println('поворот вправо на 90гр');
b := Transpose(a);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(b[i,j]);
println;
end;
println;
Println('поворот на 180 гр');
b := Transpose(a);
b := Transpose(b);
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
Print(b[i,j]);
println;
end;
end.