1. Программа 10 раз прибавляет 9 к нулю =>
s = 9 * 10 = 90
Ответ: 90.
2. Программа 7 раз отнимает 7 от 50 =>
m = 50 - 7 * 7 = 1
Ответ: 1.
3. Программа прибавляет удвоенный индекс цикла (от 2 до 9) к нулю
s = 2 * (2 + 3 + 4 + 5 + 6 + 7 + 8 + 9) = 88
Ответ: 88.
4.
a = 30; b = 6
a = 30 / 2 * 6 = 15 * 6 = 90; b = 6
a > b = 90 > 6 = true =>
a = 90; c = 90 - 12 * 6 = 90 - 72 = 18
Ответ: 18.
5.
a = 5; c = 3
a = 5; c = 7 + 5 * 3 = 7 + 15 = 22
a = 22 / 2 * 5 = 11 * 5 = 55; c = 22
Ответ: 55.
Ну как-то так у меня вышло на скорую руку
1)
uses crt;
var i:integer;
A:array[0..15] of integer;
begin
For i:= 0 to 15 do
A[i]:= i+1;
For i:= 0 to 14 do
A[i]:= A[i+1];
For i:=0 to 15 do
write(A[i],' ');
end.
2) Перемещает первый элемент массива в конец.
Const
n = 5;
var
a: array[1..n, 1..n] of integer;
i, j, m, nmax, nmin, jmax, jmin: integer;
begin
Randomize;
writeln('Исходный массив');
for i := 1 to n do
begin
nmax := -100;
nmin := 100;
for j := 1 to n do
begin
a[i, j] := Random(24) - 8;
if nmax < a[i, j] then
begin
nmax := a[i, j];
jmax := j
end;
if nmin > a[i, j] then
begin
nmin := a[i, j];
jmin := j
end;
write(a[i, j]:4)
end;
writeln;
a[i, jmax] := nmin;
a[i, jmin] := nmax
end;
writeln(#13#10, 'Результирующий массив');
for i := 1 to n do
begin
for j := 1 to n do write(a[i, j]:4);
writeln
end
end.
Тестовое решение:
Исходный массив
-4 8 3 7 5
-7 -7 1 8 0
14 0 0 1 -1
14 7 -5 -1 14
7 6 1 -6 14
Результирующий массив
8 -4 3 7 5
8 -7 1 -7 0
-1 0 0 1 14
-5 7 14 -1 14
7 6 1 14 -6
Не может формула №2, так как в ней заданы относительные ссылки и при копировании формулы в ячейку Е4 она будет выглядеть так:
=3*H6+I9, что не соответствует условию