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

Задачи по Pascal

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

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

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

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

Посмотрите вот эту ( задачу ).

Вкратце : там мы нашли только первую цифру, но там также сказано что все остальные цифры кроме первой равны 9-ти, это значит что нам нужно найти первую цифру и умножить её на 9. И всё.

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

  1. Переменная summa — для суммы числа
  2. Переменная first — для первой цифры числа
  3. Переменная last — для последней цифры

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

uses crt;

var
    first , last, summa : integer;

begin
end.

Тут мы просто объявили переменные. Теперь найдем первую цифру и занесем её в переменную first. Ну а дальше просто умножим её на 9(переменную last).

summa := 2013;


first := summa mod 9 ;
last := 9;

writeln('Произведение 1-й и последней цифры : ' , first*last);

Наверное правильно ))

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

uses crt;

var
    first , last, summa : integer;

begin
clrscr;

summa := 2013;

first := summa mod 9 ; // записываем первую цифру числа
last := 9;

writeln('Произведение 1-й и последней цифры : ' , first*last);

readln;
end.

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