Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.68/19: Рейтинг темы: голосов - 19, средняя оценка - 4.68
0 / 0 / 0
Регистрация: 25.02.2012
Сообщений: 15
1

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

16.03.2012, 22:17. Просмотров 3897. Ответов 1
Метки нет (Все метки)


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


2)Даны десять вещественных чисел. Найти их среднее арифметическое.
0.82 5.39 4.63 1.41 4.99 7.06 9.54 1.81 0.35 1.81
3.78
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.03.2012, 22:17
Ответы с готовыми решениями:

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

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

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

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

1
3450 / 2388 / 2135
Регистрация: 04.12.2011
Сообщений: 3,965
16.03.2012, 22:57 2
Лучший ответ Сообщение было отмечено mr.brain как решение

Решение

2.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
  var
    n,s,sr: real;
    i: byte;
begin
  s:=0;
  for i:=1 to 10 do
  begin
    write('vvedite ',i,'-e chislo: ');
    readln(n);
    s:=s+n;
  end;
  sr:=s/10;
  writeln('srednee = ',sr:5:2);
  readln;
end.
Добавлено через 5 минут
1.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
  var
    n,s,k,l: integer;
begin
  write('vvedite chislo n ');
  repeat
    readln(n);
  until n>0;
  while n>0 do
  begin
    k:=n mod 10;
    s:=s+k;
    n:=n div 10;
    inc(l);
  end;
  writeln('summa cifr = ',s,'; kolichestvo = ',l);
  readln;
end.
2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.03.2012, 22:57

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

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

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

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

С помощью операции деления нацело и взятия остатка от деления определить имеется ли в записи числа n цифра "2"
я решила задачу но она выводит только однозначные цифры а многозначные не решает. может я решила...


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

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

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