Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
juhf
03.11.2021 02:23 •
Информатика
Дан целочисленный прямоугольный массив 6x10. опишите в программе "паскальавс" алгоритм вычисления суммы минимальных элементов из каждой строки. напечатать значение этой суммы. предполагается, что в каждой строке минимальный элемент единственный.
Показать ответ
Ответ:
10alinka01
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 оценок)
Популярные вопросы: Информатика
Dimafdj
20.01.2023 05:23
Две минуты стереозаписи занимают на диске 1,3 Мб, количество уровней кодирования звука 8. С какой частотой дискретизации записан звук? ответ переведите в килоГерцы и округлите...
dulikosha20051
22.10.2022 12:02
1. Определить энтропию физической системы, которая может находиться в одном из 10 состояний. Вероятности состояний равны соответственно: 0,01; 0,05; 0,13; 0,04; 0,15; 0,1;...
semchik60
23.02.2023 07:34
ПОЛОЖЕНИЕ КУРСОРА В СЛОВЕ С ОШИБКОЙ ОТМЕЧЕНО ЧЁРТОЧКОЙ: МО|АНИТОР. ЧТОБЫ ИСПРАВИТЬ ОШИБКУ, СЛЕДУЕТ НАЖАТЬ КЛАВИШУ: а) Deleteб) Backspaceв) Delete или Backspaceг) Enter...
СофияKomarova
06.02.2020 15:28
Решить задачу по информатике....
ррр322
08.04.2022 18:22
Какой вклад ввел карл линней в информатику?...
CoolGirl78
06.03.2023 20:30
Для каких из чисел истинно высказывание: не (вторая цифра чётная) и (последняя цифра чётная) 1) 2345 2) 6848 3) 3561 4) 4562 5) 3778...
maly2111q
25.02.2022 22:29
Клиент положил в банк 1 марта 1000 рублей. ежемесячно вклад увеличивается на 2%. а) сколько денег будет через 6 месяцев. б) в каком месяце сумма вклада превысит 1200. в)...
srySyutoduofyi
25.02.2022 22:29
Определите результат выполнения процедуры, которая обрабатывает строковые переменные, insert(sl, s, p), где s: =ант. sl: =треко, p: =3. вообще не понимаю о чем речь((...
tumenka140
03.11.2020 13:45
Поставь арифметическое знаки между данными цифрами так что бы выражения стали верными . чтобы избежать употребления скобок которые показывают в каком порядке совершаются...
далина3
17.12.2022 00:38
Составьте уравнение реакций по схеме:C2H6-C2H4-C2H5OH-C2H5C1-C2H5OH-CH3COOH...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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