tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
1) дан двумерный массив.
1) дан двумерный массив. найти сумму элементов в строках c k1 до k2.
Рыжая111111
1 25.05.2019 05:10
2
Ответы
ingad1986
01.04.2020 20:43
type matr=array[1..20,1..20] of integer;
function Summa(a:matr;m,k1,k2:byte):integer;
var i,j:byte;
s:integer;
begin
s:=0;
for i:=k1 to k2 do
for j:=1 to m do
s:=s+a[i,j];
Summa:=s;
end;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
megaandreychuk
25.11.2021 09:33
Проанализируйте достоинства инструментов в 2D- и 3D-програм- мах. Найдите 5 сходств и 5 различий в назначениях инструментов графического редактора Paint и программы SketchUp....
ksskjskdjdkdk
25.11.2021 09:33
Решите задачи phyton 1.Создайте список из пяти чисел. Выведите на экран их сумму, мальный и минимальный элемент. Для решения воспользуй тесь встроенными в Python функциями sum(),...
francyzovaola2
25.11.2021 09:33
Составьте программу, которая заменяет букву а на букву б и наоборот в данной символьной строке, написанной всеми заглавными и стройными буквами. При вводе строки оглваоОГЛВАО результат...
Алёнка12082004
25.11.2021 09:33
Перечертите три вида детали. Выполните разрезы соединение половины вида и полвины разреза. На чертеже нанесите размеры. При нанесении размеров соблюдайте...
t22422
20.10.2020 18:28
Укажите неправильно записанные числа в соответствующих системахсчисленияБыстрее...
280artur280
20.10.2020 18:27
Чему равен десятичный эквивалент числа 10A ^16в ответе укажите только число без указания основания системы)...
kulaevmasya
20.10.2020 18:27
Система, обеспечивающая безопасность музейного экспоната, контролируется 29 датчиками. Запишите наименьшую разрядность двоичного кода, достаточную для идентификации всех датчиков...
goldenrosemaryk
20.10.2020 18:27
Обрыдалась, пока пыталась решить, СЛЕЗНО УМОЛЯЮ (100б) В одной из кодировок каждый символ кодируется 8 битами. Степан написал текст (в нем нет лишних пробелов, символы переноса слов...
Gagatyngerz
20.10.2020 18:06
Укажите, что означают параметры процессора: AMD Athlon 64 3.0G...
pavelakur
20.10.2020 18:06
I Разгадай ребусБудь внимателен! Здесьнужно заменить сразунесколько букв в слове«плот» и убрать многовсего из слова TepMOC ...
Популярные вопросы
Земельное владение богатого человека это усадьба участок или имение...
1
Уроки французского Задания 1.Имя и отчество учительницы французского языка.2....
1
Напиши выводы, как реформы повлияли на новый путь развития Японии....
2
Бауырмал отзывчивый септік жалғау...
3
ответь на предложенные утверждения «Да-Нет». Напиши верный ответ, в случае если...
2
по истории России заселения Новороссии: 1………………………………………………………………. 2………………………………………………………………....
1
К 450 г 96 процентного раствора фосфорной кислоты добавили 250 г воды. Рассчитайте...
3
Каким прыжка установлены действующие мировые рекорды в прыжках в высоту у мужчин...
3
Для виготовлення силікатної цегли використовують кальцій силікат. Иого добувають...
3
Өтінемін, көмектесіндерші. беремін...
1
function Summa(a:matr;m,k1,k2:byte):integer;
var i,j:byte;
s:integer;
begin
s:=0;
for i:=k1 to k2 do
for j:=1 to m do
s:=s+a[i,j];
Summa:=s;
end;