Помогите! Совсем не дружу с Паскалем ...

Что будет результатом выполнения фрагмента программы на языке программирования 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;

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

Question

Информатика

Лукреция

17 ноября, 18:35

Помогите! Совсем не дружу с Паскалем ...

Что будет результатом выполнения фрагмента программы на языке программирования 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;

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

+3

Ответы (1)

Знаете ответ на вопрос?

Самсоний · Answer 1

Короче, смотри 1 + 1 = 5 + 1 выполняется Else (В данном коде у тебя ничего не происходит), пошли по кругу, 1 + 2 = 5 + 1 снова выполняется Else, и т. д, пока не будет 1 + 5 = 5 + 1 тогда здесь уже выполняется Then, а именно число которые стоит в позиции i = 1 и j = 5 (i - это строки) (j - это столбцы) например там стоит число 20 то уже будет 21.