Задать вопрос
12 января, 04:18

Как найти произведение элементов 4 столбца? Турбо паскаль

program sbb;

uses crt;

var

i, j, s:integer;

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

begin

for i:=1 to 5 do

begin

for j:=1 to 10 do

begin

random (50) ;

a[i, j]:=random (50) ;

write (' ') ;

write (a[i, j]) ;

end;

writeln

end;

+3
Ответы (1)
  1. 12 января, 05:14
    0
    s:=1;

    for i:=1 to 5 do

    s:=s*a[i, 4];

    {в s произведение 4 столбца}
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Как найти произведение элементов 4 столбца? Турбо паскаль program sbb; uses crt; var i, j, s:integer; a:array[1 ... 5,1 ... 10] of integer; ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы