Задачи по Pascal. Найти первую цифру в наименьшем натуральном числе сумма цифр которого равна 2013

Задачи по Pascal

Условие задачи : Найти первую цифру в наименьшем натуральном числе сумма цифр которого равна 2013 (Язык Pascal)

Сложность : легкая .

Решение задачи :

Для начала продумаем наше решение.

Число должно содержать, как можно меньше разрядов, поэтому найдём такое число, в котором все цифры, начиная со второй будут равны 9.

2013:9=223 (ост.6)

Получается, что наименьшее число, сумма цифр которого равна 2013, состоит из 224 цифр фигасе да?, первая из которых равна 6, а остальные 223 цифры являются девятками. Вот как то так.

Для решения задачи нам понадобятся следующие переменные :

  1. Переменная number — для первой цифры.
  2. Переменная summa — в которую мы занесем 2013

Начнем мы с каркаса нашей программы :

uses crt;

var
    number , summa : integer;
begin
end.

Ну а теперь просто ищем остаток от деления :

summa := 2013;

number := summa mod 9 ;

writeln('Первая цифра равна : ' , number);

Из всех числе с такой суммой цифр наименьшим будет во-первых число, состоящее из наименьшего количества цифр, а во-вторых, с наименьшей возможной первой цифрой.

Сколько знаков должно быть у числа, чтобы сумма его цифр могла составлять 2013? 2013/9=223 (остаток 6).

Значит наименьшим числом с суммой цифр 2013 будет число 699…9, где за шестеркой идёт 222 девятки.

Всё решение задачи Pascal :

uses crt;

var
    number , summa : integer;
begin
clrscr;

summa := 2013;

number := summa mod 9 ;

writeln('Первая цифра равна : ' , number);

readln;
end.

cyber
Оцените автора
CyberLesson | Быстро освоить программирование Pascal и C++. Решение задач Pascal и C++
Добавить комментарий