24.11.2012
Задача полностью сформулирована в заголовке. Задача как бы разбивается на 2: Найти ту строчку, где больше всего минимальных элементов Отсортировать эту строчку. Исходный код:
Browsing tag: массив
21.11.2012
Новая задачка. Вводится последовательность из n целых чисел. Для каждого числа последовательности вывести новое число, которое появляется после записи цифр числа в обратном порядке. Функцией оформить определение нового числа для заданного. Примечание: Сделать нужно без применения динамической памяти. Начинаем думать. Работа с цифрами в числе. и функция. Пригодится что-то вроде вот этой функции, только ее
23.10.2012
Задача: Напишите программу, которая принимает с клавиатуры число N, создает матрицу размера N на N, заполненную случайными числами, и выводит ее на экран. Затем определите количество четных чисел в этой матрице. Все просто. Сначала стандартные операции по заполнению массива и выводу его на экран, а весь смысл в этом условии:
23.10.2012
Задача: След матрицы – это сумма диагональных элементов этой матрицы. Напишите программу, которая принимает с клавиатуры число N, создает матрицу размера N на N, заполненную случайными числами, и выводит ее на экран. Затем вычислите след этой матрицы. Для решения этой задачи пригодятся формулы диагоналей из задачи «Единичная матрица» Я написал 2 варианта решения. Первый —
23.10.2012
Задание Квадратная матрица называется единичной, если все ее диагональные элементы равны единице, а остальные — нулю. Напишите программу, которая принимает с клавиатуры число N, создает единичную матрицу размера N на N и выводит ее на экран. Штука тут в том, что нужно заполнить диагонали единицами, а все остальное нулями. Чтобы так сделать, нужно понять, какая
23.10.2012
Задание: Напишите программу, которая принимает с клавиатуры число N, создает матрицу размера N на N, заполненную случайными числами, и выводит ее на экран. Эта же задача, но без динамического массива и просто си
29.09.2012
Сделать элементы главной диагонали матрицы одним цветом, выше — другим, ниже третьим. Public Sub glav_diag() Dim i As Integer Dim j As Integer n = InputBox(«n=») For i = 1 To n For j = 1 To n If i = j Then Cells(i, j).Interior.Color = vbGreen End If If i < j Then Cells(i,