Задать вопрос
4 июня, 20:44

Что нужно изменить во 2-ом решении по сравнению с 1-ым решением?

№1 Дан двумерный массив. Определить сумму элементов второго столбца массива, больших 10.

Решение №1.

program sum;

var a: array[1 ... 10, 1 ... 10] of integer;

i, j, s: integer;

begin

s : = 0;

for i : = 1 to 10 do

begin

for j : = 1 to 10 do

begin

a[i, j] : = random (20) + 1;

write (a[i, j]:3) ;

if (j = 2) and (a[i, j] > 10) then

s : = s + a[i, j];

end;

writeln;

end;

writeln ('Сумма элементов 2 го столбца больших 10 равна', s) ;

readln

end.

№2 Дан двумерный массив. Определить сумму элементов заданного столбца массива, больших 10.

Решение №2.

?

+5
Ответы (1)
  1. 5 июня, 00:25
    0
    добавить ввод номера столбца.

    строку if (j = 2) and (a[i, j] > 10) then заменить

    на if (j = m) and (a[i, j] > 10) then где m - введенный номер столбца.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Что нужно изменить во 2-ом решении по сравнению с 1-ым решением? №1 Дан двумерный массив. Определить сумму элементов второго столбца ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике