Дана матрица размера N × M и целое число K (1 ≤ K ≤ M ). После столбца матрицы с номером K вставить столбец из единиц. Есть готовая программа но там есть недочёт
Random R = new Random();
Console.Write("Введите N: ");
int N = Int32.Parse(Console.ReadLine());
Console.Write("Введите M: ");
int M = Int32.Parse(Console.ReadLine());
int[,] A = new int[N, M];
Console.Write("Введите K: ");
int k = Int32.Parse(Console.ReadLine());
int i, j;
int[,] A1 = new int[N, M+1];
Console.WriteLine("\nЭлементы матрицы: ");
for (i = 0; i < A.GetLength(0); i++)
{
for (j = 0; j < A.GetLength(1); j++)
{
A[i, j] = R.Next(0, 10);
Console.Write(A[i, j] + "\t");
}
Console.WriteLine();
}
Console.WriteLine();
if (1 <= k & k <= M)
{
for (i = 0; i < N; i++)
{
for (j = k; j < k + 1; j++)
{
A[i, j] = 1;
}
Console.WriteLine();
}
Console.WriteLine("\nЭлементы новой матрицы, со столбцом из единиц: ");
for (i = 0; i < N; i++)
{
for (j = 0; j < k + 1; j++)
{
Console.Write(A[i, j] + "\t");
}
for (j = k + 1; j < M; j++)
Console.Write(A[i, j] + "\t");
Console.WriteLine();
}
}
else Console.WriteLine("K не соответствует условию!");
}
}
}
В n будем хранить количество чисел, которые ещё нужно вывести. a и b - предыдущее и текущее числа Фибоначчи. По определению, следующее число Фибоначчи равно сумме двух предыдущих, так что новое значение b будет a + b. Чтобы не заводить новую временную переменную, новое значение a можно будет найти, вычитая из нового b старое a, получится (a + b) - a = b.
Код процедуры:
procedure print_fib(n: integer);
var a, b, t: integer;
begin
a := 0;
b := 1;
while n > 0 do
begin
write(b, ' ');
b := a + b;
a := b - a;
n := n - 1;
end;
end;
Пример основной программы:
begin
print_fib(10)
end.
Вывод:
1 1 2 3 5 8 13 21 34 55