Информатика | 5 - 9 классы
Дано натуральное число : − найти сумму цифр этого числа ; − верно ли, что число начинается и заканчивается одной и той же цифрой.
Дано натуральное четырехзначное число n?
Дано натуральное четырехзначное число n.
Найти сумму его цифр.
Дано натуральное число?
Дано натуральное число.
Верно ли, что сумма его цифр больше 10?
Paskal.
1) дано натуральное а?
1) дано натуральное а.
Верно ли, что данное число состоит из 3 цифр?
2) дано натуральное число.
Верно ли, что в данном числе четыре цифры?
3) Даны два натуральных числа.
Определить в каком числе первая цифра больше.
4) Дано натуральное n.
Найти количество 6, входящих в данное число.
Нужно решить в программе паскаль.
Если поможет, то мы учим цикл в паскале, div, mod.
Дано натуральное число n?
Дано натуральное число n.
Найти сумму первой и последней цифры этого числа.
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа?
Составить программу на паскале Дано натуральное число, найти сумму цифр этого числа!
Помогите по паскалю?
Помогите по паскалю!
! Даны два целых числа.
Верно ли, что они заканчиваются на одну и ту же цифру?
Даны два натуральных числа?
Даны два натуральных числа.
Выяснить в каком из них сумма цифр больше.
(Определить функцию для расчета суммы цифр натурального числа).
Дано натуральное число n?
Дано натуральное число n.
Определить : a) Количество цифр в этом числе ; б)Сумму его цифр ; в)Первую цифру числа n ;
Дано натуральному число?
Дано натуральному число.
Верно ли, что сумма его цифр не меньше 10?
Составить программу, прошу) Дано натуральное число, верно ли что оно начинается и заканчивается одной и той же цифрой?
Составить программу, прошу) Дано натуральное число, верно ли что оно начинается и заканчивается одной и той же цифрой.
На этой странице вы найдете ответ на вопрос Дано натуральное число : − найти сумму цифр этого числа ; − верно ли, что число начинается и заканчивается одной и той же цифрой?. Вопрос соответствует категории Информатика и уровню подготовки учащихся 5 - 9 классов классов. Если ответ полностью не удовлетворяет критериям поиска, ниже можно ознакомиться с вариантами ответов других посетителей страницы или обсудить с ними интересующую тему. Здесь также можно воспользоваться «умным поиском», который покажет аналогичные вопросы в этой категории. Если ни один из предложенных ответов не подходит, попробуйте самостоятельно сформулировать вопрос иначе, нажав кнопку вверху страницы.
Program asdf ;
var a, i.
B : integer ;
s : string ;
begin
readln(a) ;
s : = inttostr(a) ;
a : = length(s) ;
b : = 0 ;
for i : = 1 to a do
b : = b + s[i] ;
writeln(b) ;
if s[1] = s[a] then writeln('равны') else writeln('неравны') ;
end.