Информатика | 5 - 9 классы
Дано натуральное число.
Определить сумму его цифр, больших 5.
Дано натуральное четырехзначное число n?
Дано натуральное четырехзначное число n.
Найти сумму его цифр.
Дано натуральное число?
Дано натуральное число.
Определить каких цифр в данном числе больше четных или нечетных.
Через Паскаль.
Дано натуральное число?
Дано натуральное число.
Верно ли, что сумма его цифр больше 10?
Paskal.
Дано натуральное число n?
Дано натуральное число n.
Найти сумму первой и последней цифры этого числа.
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа?
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа!
Дано четырехзначное натуральное число?
Дано четырехзначное натуральное число.
Определить является ли сумма первой и последней цифр кратной 3 Паскаль.
Даны два натуральных числа?
Даны два натуральных числа.
Выяснить в каком из них сумма цифр больше.
(Определить функцию для расчета суммы цифр натурального числа).
Дано натуральное число определить его максимальную цифру?
Дано натуральное число определить его максимальную цифру.
Дано натуральное число n?
Дано натуральное число n.
Определить : a) Количество цифр в этом числе ; б)Сумму его цифр ; в)Первую цифру числа n ;
Дано натуральному число?
Дано натуральному число.
Верно ли, что сумма его цифр не меньше 10?
На этой странице сайта размещен вопрос Дано натуральное число? из категории Информатика с правильным ответом на него. Уровень сложности вопроса соответствует знаниям учеников 5 - 9 классов. Здесь же находятся ответы по заданному поиску, которые вы найдете с помощью автоматической системы. Одновременно с ответом на ваш вопрос показаны другие, похожие варианты по заданной теме. На этой странице можно обсудить все варианты ответов с другими пользователями сайта и получить от них наиболее полную подсказку.
Программа слаживает все цифры натурального числа, введённого пользователем, и выполняет из них сумму :
var r : real ; s : string ; q : integer ; sum : real ; i : integer ;
begin Write(' Введите натуральное число : ') ; Readln(r) ; s : = FloatToStr(r) ; q : = length(s) ; for i : = 1 to q do begin r : = StrToFloat(s[i]) ; if r > ; 5 then sum : = sum + r ; end ; writeln(' Сумма всех чисел, превышающих 5 = ', sum, '.
') ; end.