Задать вопрос
25 августа, 14:09

Что будет результатом выполнения фрагмента программы на языке

программирования Turbo Pascal:

For i : = 1 to n do

begin y[i] : = 0;

For j : = 1 to m do

if x[j, i] > 0

then y[i] : = y[i] + x[i, j];

end;

(Опишите словами, например, результатом будет количество четных элементов в каждом

столбце квадратной матрицы)

+2
Ответы (1)
  1. 25 августа, 15:58
    0
    Результатом будет являтся y[i] полученная сложением всех положительных элементов строки матрицы
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Что будет результатом выполнения фрагмента программы на языке программирования Turbo Pascal: For i : = 1 to n do begin y[i] : = 0; For j : ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Помогите! Совсем не дружу с Паскалем ... Что будет результатом выполнения фрагмента программы на языке программирования Turbo Pascal: k : = 0; For i : = 1 to n do For j : = 1 to n do if i + j = n + 1 then a[i, j] : = a[i, j] + i;
Ответы (1)
1. определить значение переменной А после выполнения оператора X:=5; if X>-3 then A:=X mod 2 else A:=abs (X) ; 2. определить значение переменной А после выполнения оператора X:=-26; Y:=6; if X div Y=4 then A:=X mod Y else A:=X*Y; 3.
Ответы (1)
3. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы? a:=2; for i:=0 to 2 do begin a:=a+i; end; Ответ: введите число 4.
Ответы (2)
Program kod; Var q, w, e, r, t, y, u, i, x:integer; Begin write (q, w, e, r, t, y, u, i) ; if q=1 then x + (1*2*2*2*2*2*2*2) ; if q=0 then x+0; if w=1 then x + (1*2*2*2*2*2*2) ; if w:=0 then x+0; if e=1 then x + (1*2*2*2*2*2) ; if e=0 then x+0;
Ответы (1)
10. Что будет результатом выполнения фрагмента программы на языке программирования TurboPascal: S : = 0; For i : = 1 to n do For j : = 1 to n do ifi + j < n + 1 then S : = S + a[i, j];
Ответы (1)