Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.55/75: Рейтинг темы: голосов - 75, средняя оценка - 4.55
Зинка
1

Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр.

18.05.2011, 21:11. Просмотров 14465. Ответов 3
Метки нет (Все метки)


помогите, пожалуйста
Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.05.2011, 21:11
Ответы с готовыми решениями:

Используя операции деления нацело и взятия остатка от деления, найти количество и сумму цифр числа
Можете решить вот эти задачи.. Заранее спасибо!!:friends: 1) Дано целое число N(>0). Используя...

Используя операции деления нацело и взятия остатка от деления, найти количество и сумму цифр числа
7 Дано целое число N >0. Используя операции деления нацело и взятия остатка от деления, найти...

Дано число вывести все его цифры в столбик, используя операции деления нацело и взятия остатка от деления
Дано целое число N. Используя операции деления нацело и взятия остатка от деления, вывести все его...

Используя операцию деления нацело и взятия остатка от деления,найти количество, сумму цифр числа
2.Дано целое число N(>0)Используя операцию деления нацело и взятия остатка от деления,найти...

3
trainspotting
1084 / 484 / 384
Регистрация: 11.11.2010
Сообщений: 773
18.05.2011, 21:16 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
  n,m,k,s:integer;
begin
  repeat
    write('n=');
    readln(n);
  until n>0;
  s:=0;
  k:=0;
  m:=n;
  while m>0 do
    begin
      s:=s+m mod 10;
      m:=m div 10;
      inc(k);
    end;
  writeln('Chislo-> ',n, ' Summa tsifr-> ',s,' Kol-vo tsifr-> ',k);
  readln;
end.
1
143 / 143 / 141
Регистрация: 05.04.2011
Сообщений: 270
18.05.2011, 21:17 3
Pascal
1
2
3
4
5
6
7
8
9
10
var s,n,k:longint;
begin
readln(n);
repeat
  s:=s+n mod 10;
  k:=k+1;
  n:=n div 10;
until n=0;
writeln(s,' ',k);
end.
1
magirus
18.05.2011, 21:17     Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр.
  #4
 Комментарий модератора 
Зинка, называйте темы максимально информативно
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.05.2011, 21:17
Привет! Вот еще темы с ответами:

Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр
Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти ...

Дано целое число больше 999. Используя одну операцию деления нацело и одну операцию взятия остатка от деления
Дано целое число больше 999. Используя одну операцию деления нацело и одну операцию взятия остатка...

Используя операции взятия остатка от деления, найти количество и сумму цифр числа
Дано целое число N(>0). Используя операции взятия остатка от деления, найти количество и сумму его...

Дано целое число (N>0), используя операции деление нацело и взятие остатка от деления, вывести все его цифры начиная с самой правой
Задание звучит так: Дано целое число (N>0), используя операции деление нацело и взятие остатка от...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.