Задать вопрос
6 мая, 12:36

Среди всех 3-значных чисел укажите те, сумма цифр которых равна данному числу k.

+1
Ответы (1)
  1. 6 мая, 16:22
    0
    Var

    a, k: integer;

    begin

    readln (k) ;

    for a : = 100 to 999 do

    if ((a div 100) + (a mod 100 div 10) + (a mod 10) = k) then

    writeln (a) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Среди всех 3-значных чисел укажите те, сумма цифр которых равна данному числу k. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Среди всех n-значных чисел укажите те, сумма цифр которых равна данному числу k.
Ответы (1)
А. Составьте подпрограмму-функцию, которая по заданному натуральному числу n вычислит сумму его цифр. б. Составьте алгоритм, подсчитывающий количество n-значных натуральных чисел, у каждого из которых сумма цифр равна заданному натуральному числу k.
Ответы (1)
Дано натуральное число: определить а) количество цифр в нем б) сумму его цифр в) произведение его цифр г) среднее арифметическое его цифр д) сумму квадратов его цифр е) сумму кубов его цифр ж) его первую цифру з) сумму его первой и последней цифр
Ответы (1)
Задача: определить каких чисел больше: 5 значных, у которых все цифры чётные или 5 значных у которых все цифра нечётные. Помогите ...
Ответы (1)
Автомат получает на вход четырехзначное десятичное число. По полученному числу строится новое десятичное число по следующим правилам: 1) вычисляются два числа - сумма "кратчайших" цифр четырехзначного числа, а также сумма "средних" цифр заданного
Ответы (1)