Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
0 / 0 / 0
Регистрация: 13.02.2019
Сообщений: 18

Даны две тройки вещественных чисел. Найти среднее арифметическое максимумов каждой тройки

19.11.2019, 14:11. Показов 2566. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Формат ввода:

В первой строке - первая тройка чисел (три числе через пробел), во второй строке - вторая тройка чисел.

Формат вывода:

Найденное среднее с точностью 3 знака после запятой.

Пример входных данных

1.00 2.00 3.00
4.00 3.00 1.00

Пример выходных данных

3.500
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
19.11.2019, 14:11
Ответы с готовыми решениями:

Найти среднее арифметическое двух вещественных чисел
Нужно найти среднее арифметическое двух заданных вещественных чисел! Я новичок! Ну я так понимаю нужно сначало их сложить и поделить, а...

Найти тройки натуральных чисел
Найти все тройки натуральных чисел x,y,z из интервала от 10 до 50, для которых выполняется равенство: x*x-y*y-z*z=0

Найти среднее арифметическое числовой последовательности из N произвольных вещественных чисел
ребята помогите плиз с этим :Найти среднее арифметическое числовой последовательности из N произвольных вещественных чисел.

6
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
19.11.2019, 14:45
Андре123131, от куда ваше среднее 3.500?
(1+2+3+4+3+1):6 = 14:6 = 2,(3)
Pascal
1
2
3
begin
  $'{(ReadArrReal(3).Sum+ReadArrReal(3).Sum)/6:f3}'.Print;
end.
0
0 / 0 / 0
Регистрация: 13.02.2019
Сообщений: 18
19.11.2019, 14:47  [ТС]
Цитата Сообщение от JuriiMW Посмотреть сообщение
{(ReadArrReal(3).Sum+ReadArrReal(3).Sum)/6:f3
Pascal нужен
0
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
19.11.2019, 14:52
А это что по вашему?
0
 Аватар для agvego5
48 / 39 / 10
Регистрация: 18.09.2023
Сообщений: 256
09.09.2024, 09:04
Цитата Сообщение от JuriiMW Посмотреть сообщение
от куда ваше среднее 3.500?
3.00 + 4.00 = 3.500
Цитата Сообщение от Андре123131 Посмотреть сообщение
Найти среднее арифметическое максимумов каждой тройки
0
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
09.09.2024, 10:21
Pascal
1
## SeqGen(2, i->ReadString.ToReals.Max).Average.ToString('N3').Print;
0
Модератор
10430 / 5718 / 3404
Регистрация: 17.08.2012
Сообщений: 17,387
09.09.2024, 21:31
Андре123131, паскали - они разные бывают. Случается иногда Pascal ABC.NET.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.09.2024, 21:31
Помогаю со студенческими работами здесь

Найти в диапазоне до 100 все пифагоровы числа (тройки чисел)
Запрещено использовать массивы и функции.Спасибо за помощь

Найти тройки натуральных чисел из интервала от 1 до 20, для которых выполняется равенство: x2+y2=z2.
Найти все такие тройки натуральных чисел x,y,z из интервала от 1 до 20, для которых выполняется равенство: x2+y2=z2. не могу разобраться...

Найти все такие тройки натуральных чисел x, y, z из интервала от 1 до 20, для которых выполняется равенство x*x*+y*y=z*z
Найти все такие тройки натуральных чисел x, y, z из интервала от 1 до 20, для которых выполняется равенство x*x*+y*y=z*z.

Найти все такие тройки натуральных чисел x, y и z из интервала от 1 до 20, для которых выполняется равенство
2. Найти все такие тройки натуральных чисел x,y и z из интервала от 1 до 20, для которых выполняется равенство x2+y2=z2 Тип к...

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


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru