Дан двумерный массив размером mxn массив заполнен случайными числами от 5 до 10. найти произведение значений по главной диагонали и сумму по побочной диагонали.нужно написать программу в паскале к этому. !
У вас есть число 137 если вам надо перевести его в какую-нибудь систему счисления, то нужно делить это число на номер системы, так если нужно перевести число 137 в ДВОичную ,то делим на 2 до тех пор, пока остатотк от деления не равен 1.(если в ТРОичную то на 3 и т.д.). начнём: 137 / 2 = 68 выписываем остаток (1) 68 / 2 = 34 выписываем остаток (0) 34 / 2 = 17 выписываем остаток (0) 17 / 2 = 8 выписываем остаток (1) 8 / 2 = 4 выписываем остаток (0) 4 / 2 = 2 выписываем остаток (0) 2 / 2 = 1 <== на этой единице заканчиваем деление, далее снизу вверх выписываем получившееся число : 001001; ответ: 001001
Растровое графическое изображение формируется в процессе сканирования изображений и фотографий с бумаги или фотопленок, а также при использовании цифровых фото и видеокамер. РГИ (растровое графическое изображение) очень чувствительно к масштабированию; формируется из отдельных точек - пикселей.
Векторное же графическое изображение формируется из линий, прямоугольников, треугольников, квадратов и т.д., которые сохраняются в памяти компьютера с математических формул. Используется для сохранения четких контуров изображений; создания рисунков и различных графических объектов.
var
A : array [1..999, 1..999] of Integer;
p, s, i, j, m, n: Integer;
begin
// Инициализация переменных для суммы и произведения
s:= 0;
p:= 1;
Write('Введите количество строк - ');
ReadLn(m);
Write('Введите количество столбцов - ');
ReadLn(n);
// Заполнение
for i:=1 to m do
for j:=1 to n do
A[i,j]:=Random(6)+5;
// Вывод массива
for i:=1 to m do
begin
for j:=1 to n do
Write(A[i,j]:3);
WriteLn();
end;
// Подсчёт произведения и суммы
for i:= 1 to m do
begin
j:= i;
s+= A[m-i+1,j];
p*= A[i,j];
end;
WriteLn('Произведение = ', p);
WriteLn('Сумма = ', s);
end.