Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
0 / 0 / 0
Регистрация: 05.02.2009
Сообщений: 4

В одномерном массиве найти число, сумма цифр которого минимальна

05.02.2009, 19:06. Показов 2096. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В одномерном массиве, заполненном двухзначными числами,
найти число, сумма цифр которого минимальна
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
05.02.2009, 19:06
Ответы с готовыми решениями:

Счастливым называется семизначное число, у которого сумма его первых трех цифр равна сумме его трех последних цифр
Семизначное число называется "Счастливым", если у него сумма первых трех цифр равна сумме последних трех. Составить программу,...

Дана строка целых чисел. Составить программу, которая найдет число, сумма цифр которого максимальна
2. Дана строка целых чисел. Составить программу, которая найдет число, сумма цифр которого максимальна.

Определить элементы, сумма цифр в записи которых максимальна и минимальна
Здравствуйте! Помогите пожалуйста написать программу на Паскале. В произвольно заданном одномерном массиве целых чисел, определить...

5
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
05.02.2009, 19:57
Сделай массив из 2х значных чисел и как обычно минимум ищут также ищи число с минимальной суммой цифр, которая находися так:
sm:=a[i] div10 + a[i] mod 10;
0
0 / 0 / 0
Регистрация: 05.02.2009
Сообщений: 4
05.02.2009, 20:45  [ТС]
Не получилось
руки наверно кривые
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
05.02.2009, 21:54
Руки тут ни при чем, ты же не дрова колешь, тут другое место кривое + лень.
0
0 / 0 / 0
Регистрация: 05.02.2009
Сообщений: 4
05.02.2009, 22:16  [ТС]
Напиши плиз а то у меня вывод 2 число все время
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
05.02.2009, 22:24
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses crt;
const n=10;
var a:array[1..n] of byte;
    i,min,imin:byte;
begin
clrscr;
randomize;
writeln('Massiv:');
for i:=1 to n do
  begin
   a[i]:=random(90)+10;
   write(a[i],' ');
  end;
writeln;
min:=18;
for i:=1 to n do
if (a[i] div 10+a[i] mod 10)<min then
  begin
    min:=(a[i] div 10+a[i] mod 10);
    imin:=i;
  end;
write('Chislo s minimalnoj summoj cifr=',a[imin]);
readln
end.
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
05.02.2009, 22:24
Помогаю со студенческими работами здесь

Найти такое число, что сумма его цифр превосходит произведение цифр этого же числа на 1
сумма цифр заданного четырехзначного N превосходит произведение цифр этого же числа на 1. ПОМОГИТЕ ПОЖАЛУЙСТА

Составить программу, которая по заданным натуральным числам N и S найдет наименьшее число, большее N, сумма цифр которого равна S
Решите пожалуйста!!!!!! хотя бы одну!!! Задача 1. &quot;Число&quot; (20 баллов) Имя входного файла: a.in Имя выходного файла: a.out ...

Составить программу, которая по заданным натуральным числам N и S найдет наименьшее число, большее N, сумма цифр которого равна S
паскаль знаю на уровне школьника, вот такая задача: Составить программу, которая по заданным натуральным числам N и S найдет...

Найти в массиве номер столбца сумма элементов которого наименьшая
помогите пожалуйста. 1. найти в массиве номер столбца сумма элементов которого наименьшая? ( в паскале) 2.дан массив из 20 элементов....

Найти все четырехзначные числа,у которых сумма крайних цифр равна сумме средних цифр,а само число делится на 6 и 27
Найти все четырехзначные числа,у которых сумма крайних цифр равна сумме средних цифр,а само число делится на 6 и 27. Программа при запуске...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru