Составить программу, которая вычесляет суммы элементов столбцов двумерного массива и записывает их в одномерный массив.
10-11 класс
|
var
i,j:integer;
a:array[1..5,1..10]of integer;
b:array[1..10]of integer;
begin
for i:=1 to 5 do
begin
for j:=1 to 10 do
begin
a[i,j]:=random(10);
write(a[i,j]:4);
end;
writeln;
end;
writeln;
for j:=1 to 10 do
begin
for i:=1 to 5 do b[j]:=b[j]+a[i,j];
write(b[j]:4);
end;
end.
Другие вопросы из категории
Скорость передачи данных через модемное
соединение равна 51 200 бит/с. Передача текстового файла через это соединение
заняла 10 с. Определите, сколько символов содержал переданный текст, если
известно, что он был представлен в 16-битной кодировке Unicode.
Кощей Бессмертный зарыл клад на глубину 1 м. Этого ему показалось не
достаточно, он отрыл клад, углубил колодец до 2 м и снова зарыл. Этого ему
опять показалось мало, он отрыл клад,
углубил колодец до 3 м
и зарыл. Затем он проделал тоже, углубив
колодец до 4 м, потом до 5 м, 6 м и т.д. Известно, что колодец глубиной
Дан вектор из 25 элементов. Найти минимальное значение. Записать на языке Pascal и построить алгоритм.
Читайте также
двумерном массиве размерности 3х3. Заполнить массив целыми случайными числами из
диапазона от 0 до 15.
элементов настоящей таблице х [1 .. 10] на 0.
3.составить программу, замены отрицательного элементов настоящей таблице х [1 .. 10] на их квадрат.
4.составить прогрумму, которая увеличивает на 2 все элементы настоящей таблице х [1 .. 10], которые больше 10.
полученных сумм одномерный массив B[1..6].
пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.
Помогите написать программу, которая чётные элементы последовательности уменьшает в 2 раза, а нечётные увеличивает в 2 раза.
И ещё одна программа, которая находит сумму элементов, которые находятся под главной диагональю.
Заранее спасибо.