3 / 3 / 0
Регистрация: 23.05.2012
Сообщений: 195
1

Дано трехзначное число. Найти число десятков и единиц в том числе, сумму и произведение его цифрам

11.06.2012, 21:36. Показов 6474. Ответов 1
Метки нет (Все метки)

Дано трехзначное число.Знайты число десятков и единиц в том числе, сумму и произведение его цифрам
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.06.2012, 21:36
Ответы с готовыми решениями:

Дано двухзначное число. Найти число десятков, число единиц в нем, произведение его цифр
Помогите плиз=)) Дано двухзначное число. Найти число десятков ,число едениц в нем, произвеление его...

Дано трехзначное число; найти в нем число тысяч, десятков и единиц
нужно сделать так, как на втором скриншоте. Чтобы вычислялось. Задача: Дано трехзначное число....

Найти в числе число единиц, число десятков, сумму цифр, произведение цифр
Дано трехзначное число.Найти: число единиц в нем , число десятков в нем , сумму его цифр ,...

Дано трёхзначное число. Определить число, полученное перестановкой цифр десятков и единиц
1.Дано трёхзначное число. Определить число, полученное перестановкой цифр десятков и единиц.

1
Лучи добра
173 / 171 / 191
Регистрация: 08.06.2012
Сообщений: 292
12.06.2012, 00:29 2
Лучший ответ Сообщение было отмечено wowan30002 как решение

Решение

Как-то так, наверное.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
program z;
uses crt;
var s,p,b,a,a1,k,k1:integer;
c:array [1..100] of integer;
begin
     clrscr;
     writeln('Введите число');
     readln(b);
     a:=b;
     p:=1; s:=0; k:=0;
     while a<>0 do
           begin
                a1:=a mod 10;
                k:=k+1;
                c[k]:=a1;
                s:=s+a1;
                p:=p*a1;
                a1:=a div 10;
                a:=a1;
           end;
     writeln('Сумма цифр числа ',b,' - ',s);
     writeln('Произведения цифр числа ',b,' - ',p);
     writeln('Число единиц в числе ',b,' - ',c[1]);
     if k>1
        then
            writeln('Число десятков в числе ',b,' - ',c[2])
     else
         writeln('В числе ',b,' нет десятков!');
     readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.06.2012, 00:29
Помогаю со студенческими работами здесь

Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц
2. Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц...

Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц исходного числа (например, 123
Задание: Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц...

Дано трехзначное число. Найти сумму и произведение его цифр
ЦЕЛЫЕ ЧИСЛА Язык программирования: C# Версия задачника: 4.12 от 10/05/2014 Задание:...

Дано трехзначное число. Найти сумму и произведение его цифр
Дано трехзначное число. Найти сумму и произведение его цифр. Нарисуйте пожалуйста блок схему...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru