1 / 1 / 1
Регистрация: 15.03.2015
Сообщений: 44
1

Для нечетных чисел найти среднее арифметическое максимальной и минимальной цифр

29.03.2015, 18:44. Показов 1183. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
На интервале чисел для нечетных чисел найти среднее арифметическое максимальной и минимальной цифр, для четных определить числа с максимальной цифрой в старшем разряде.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.03.2015, 18:44
Ответы с готовыми решениями:

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

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

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

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

2
Эксперт Pascal/Delphi
2386 / 1298 / 1492
Регистрация: 29.08.2014
Сообщений: 4,661
30.03.2015, 12:06 2
Лучший ответ Сообщение было отмечено Bumshakalaka как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var
  a,b,i:integer;
function c(n:integer):string;  
var
  i,j,k,l,o:integer;
begin
  j:=0;k:=0;i:=n;o:=10;
    repeat
      l:=i mod 10;
      if l>j then j:=l;
      if l<o then o:=l;
      i:=i div 10;
      if (i=0) and (k<l)then k:=l;
    until i=0;
   if odd(n) then c:=Floattostr((j+o)/2) else c:=chr(48+k); 
end;
begin 
  repeat
  write('введите границы интервала:');readln(a,b);
  until (a<b);
  for i:=a to b do writeln(i,':',c(i));
end.
1
1 / 1 / 1
Регистрация: 15.03.2015
Сообщений: 44
31.03.2015, 10:05  [ТС] 3
спасибо за ответ, буду вникать в решение
0
31.03.2015, 10:05
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
31.03.2015, 10:05
Помогаю со студенческими работами здесь

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

Найти среднее арифметическое нечетных чисел из заданного диапазона
Найти среднее арифметическое нечетных чисел из заданного диапазона не могу написать, HELP...

Найти среднее арифметическое всех натуральных (N) нечетных двузначных чисел
Помогите пожалуйста написать программу: найти среднее арифметическое всех натуральных(N) нечетных...

Найти среднее арифметическое чисел, больших заданного D и стоящих на нечетных местах
Найти среднее арифметическое чисел, больших заданного D и стоящих на нечетных местах, и определить...


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

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

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