Задать вопрос
25 мая, 04:40

Как найти произведение элементов 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;

+2
Ответы (1)
  1. 25 мая, 05:16
    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; ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы