Дан двумерный массив чисел. определить, сумму элементов второго столбца массива, больших 10.
102
209
Ответы на вопрос:
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); end.
Смешно. для всех натуральных n число 6^n оканчивается на 6. var n: extended; begin readln(n); writeln(6) end.
Популярно: Информатика
-
iirunka15304.08.2021 08:58
-
k03a1234505.12.2020 03:02
-
katelove824.10.2022 15:42
-
annzhoravel46105.07.2021 14:16
-
Учебниккнига28.01.2023 08:45
-
pveronika080807.09.2022 08:00
-
laskia12.03.2022 18:28
-
Keenio18.05.2020 14:20
-
Pomogu0pogalycta26.10.2022 10:59
-
mikhail2005com03.01.2020 17:54