Создать программу в паскалеНахождения суммы и произведения трехзначного числа. Сказали, что еще пригодиться эта формула: z: = (adiv10)mod10
5-9 класс
|
Заранее спасибо^.^
var
number, first, second, third : integer;
begin
readln(number);
first := number div 100;
second := number div 10 mod 10;
third := number mod 10;
writeln('Сумма: ', first + second + third);
writeln('Произведение: ', first * second * third);
end.
Число вводится или так существует?
Ладно, пускай будет вводиться
Другие вопросы из категории
1. специальная кассета для удобного размещения дискет с операционной системой
2. специальная программа, упрощающая диалог пользователь – компьютер,
выполняет команды операционной системы
3. система приемов и способов работы конкретной программы при загрузке программ
и завершении работы
Если число х больше 139, то увеличить его в 74 раза, и уменьшить на 48 в противном случае.
Читайте также
(написать на языке программы паскаль, и если кто забыл, то квадрат суммы это - квадрат первого числа плюс удвоенное произведение первого на второе плюс квадрат второго числа )
2)Дано натуральное трехзначное число N
(ниже представлен рекомендуемый вид экрана во время работы программы)
Вычисление частичной суммы рада 1,3,5,7.
Введите количество суммируемых членов ряда: 15
Сумма первых 15 членов ряда равна 330.
виде 3+2*10+1*10*10. Воспользовавшись этой информацией, создайте программу,
которая, получая от пользователя трехзначное число, будет определять из каких цифр
оно состоит и выводить их через пробел (например, 1_2_3).
1) есть ли среди цифр заданного трехзначного числа одинаковые;
Пример входных данных
123 нет
121 да
222 да
2) является ли число '' перевертышем" , т.е. числом , десятичная запись которого читается одинаково слева направо и справа налево.
Пример входных данных
122 нет
121 перевертыш
222 перевертыш
Пожалуйста с примером!!!
Заранее большое спасибо