Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ЛамповаяУмничка
15.02.2023 17:12 •
Информатика
Дан целочисленный прямоугольный массив 6x10. опишите в программе "паскальавс" алгоритм вычисления суммы минимальных элементов из каждой строки. напечатать значение этой суммы. предполагается, что в каждой строке минимальный элемент единственный.
Показать ответ
Ответ:
arinasuper000
22.07.2020 08:28
Var
a:array [1..6,1..10] of integer; b,i,j,k,l: integer;
begin
b:=0;
for i:=1 to 6 do
begin
k:=32000;
for j:=1 to 10 do
begin
read(l);
if (l<k) then k:=l;
end;
b+=k;
end;
write(b);
end.
Проверено:
1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1
1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1
1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1
ответ - 6
0,0
(0 оценок)
Популярные вопросы: Информатика
Fazzika
01.10.2020 23:14
Входная контрольная работа для учащихся 9 класса по информатике вариант 2 1. содержится в 1 байте? а) 8 б) 4 в) 2 г) 6 сколько бит информации 2. объем сообщения, содержащего 4096...
Pakemongo
25.02.2021 12:33
Напишите программу ввода значений а, b, c в одной строке и выведите результат выражения a*(b/3.14)+(c*3) в отдельной строке. в паскале...
ручка41
11.02.2021 13:01
Скорость передачи данных по некоторому каналу связи равна 256000 бит/сек. передача данных через это соединение заняла 2 минуты. определите информационный объем данных в килобайтах...
NastjaKucera13
19.08.2022 02:58
Щоб графічно розв язати рівняння 0,7*x – 5 = 0, потрібно: 1. Розглянути функцію у =2. ПобудуватиДля цього взяти два значення змінної хі обчислити3. Знайти абсцису...
Фёкла11
19.05.2023 06:06
12. Для шифрования каждой буквы используются двузначные числа. Из- вестно, что буква «е» закодирована числом 20. Среди слов «елка», «полка»,«поле», «пока», «кол» есть слова, кодируемые...
jvhhvcx
01.06.2023 03:13
очень надо. ( ) 1.Дано описание массива:consta:array[1..2]ofinteger=(12,8,68,103);Верно ли описан массив?2Дан одномерный массив. Запиши верный ответ.(Считай индексы элементов массива...
olgalubnina201
10.05.2022 21:32
Откройте Веб-страницу с адресом: www.detstvo.ru. Найдите гиперссылку праздники, нажмите на неё, дождитесь загрузки страницы, перепишите её адрес. Далее найдите ссылку фото, перепишите...
yjtkf
02.04.2022 23:50
Определи лишнее и обоснуй свой выбор: стальной нож, бронзовая медаль, чугунные рельсы...
krayushkinaalina
10.11.2022 04:51
Ракоподібним властивийОбери один варіантНепрямий розвитокПрямий розвиток з неповним перетвореннямПрямий розвиток з повним перетвореннямПрямий розвиток...
v1k2
08.08.2021 14:04
В молекуле линоловой кислоты есть два двойных связей и 18 атомов Углерода. Вследствие ее взаимодействия с водородом образуется насыщенная карбоновая кислота. Вычислите и укажите молярную...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:array [1..6,1..10] of integer; b,i,j,k,l: integer;
begin
b:=0;
for i:=1 to 6 do
begin
k:=32000;
for j:=1 to 10 do
begin
read(l);
if (l<k) then k:=l;
end;
b+=k;
end;
write(b);
end.
Проверено:
1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1
1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1
1 2 3 4 5 6 7 8 9 10
10 9 8 7 6 5 4 3 2 1
ответ - 6