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

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

27.10.2008, 23:17. Показов 41932. Ответов 6
Метки нет (Все метки)

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

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

Дано трехзначное число, найти произведение его цифр.
№1 Дано трехзначное число, найти произведение его цифр. №2 Дано натуральное число n (n<=9999),...

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

Дано n-значное число. найти сумму и произведение его цифр
Дано n-значное число. найти сумму и произведение его цифр.

6
257 / 173 / 27
Регистрация: 17.10.2008
Сообщений: 770
27.10.2008, 23:28 2
Машуня, моно вот так

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
program Project2;
 
{$APPTYPE CONSOLE}
var s:integer;
 
begin
  Writeln('vvedi chislo s:');
  Readln(s);
  Writeln('chislo desjatkov=',s div 10);
  Writeln('chislo edinic=',s mod 10);
  Writeln('proizvedenie=',(s div 10)*(s mod 10));
ReadLn;
end.
если на паскале пишешь, а не в делфаке то удали строчку {$APPTYPE CONSOLE}
и всё. Удачки в изучении.
s div 10 -число делим на 10 и получаем число десятков (пример:30/10=3)
s mod 10 -число делим на 10 и получаем остаток,число единиц (пример:34/10=4)
2
0 / 0 / 0
Регистрация: 27.10.2008
Сообщений: 11
27.10.2008, 23:59  [ТС] 3
Пасибочки за помошь =))
0
0 / 0 / 0
Регистрация: 27.10.2008
Сообщений: 11
28.10.2008, 00:16  [ТС] 4
Еще одна просьба, может Вы мне еще и блок-схему поможете построить, если не сложно =)))
0
257 / 173 / 27
Регистрация: 17.10.2008
Сообщений: 770
28.10.2008, 00:33 5
Машуня,
Если честно, то блок схемы никогда не делал.
конечно могу попробовать, но думаю мало что получится, я не знаю правил записи.
0
257 / 173 / 27
Регистрация: 17.10.2008
Сообщений: 770
28.10.2008, 00:48 6
Машуль,

посмотри, вот я тут попробовал построить, но думаю ужасно вышло..
Миниатюры
Дано двухзначное число. Найти число десятков, число единиц в нем, произведение его цифр  
1
257 / 173 / 27
Регистрация: 17.10.2008
Сообщений: 770
28.10.2008, 00:53 7
И тогда моленько код поменяется..
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program Project2;
 
{$APPTYPE CONSOLE}
var s,k,n:integer;
 
begin
  Writeln('vvedi chislo s:');
  Readln(s);
  n:=s div 10;
  Writeln('chislo desjatkov=',n);
  k:=s mod 10;
  Writeln('chislo edinic=',k);
  s:=n*k
  Writeln('proizvedenie=', s);
ReadLn;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.10.2008, 00:53
Помогаю со студенческими работами здесь

Дано целое число N — количество цифр и задана каждая из этих цифр. Сформировать число, состоящее из этих цифр, начиная с разряда единиц.
Дано целое число N — количество цифр и задана каждая из этих цифр. Сформировать число, состоящее из...

Дано трехзначное число определить количество сотен, десятков и единиц
Дано трехзначное число определить кол-во сотен,десятков и единиц.Помогите решить!

дано двухзначное число. Опредилить больше ли числа "n" сумма его цифр.
дано двухзначное число. Опредилить больше ли числа "n" сумма его цифр. помогите...

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


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

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

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