Решение задачи различными способами

@Boush · Регистрация: 02.12.2012

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

Помогите составить программу решения задачи!
Надо решить 3 способами:
1.Процедура с параметрами
2.Процедура без параметров
3.Функция

Задача: m(a,a-b)+m(a,b-c)/1+m(a+bc,-1,15)

HighPredator · 18.12.2012, 21:15

А что такое "m"?

@Boush · 18.12.2012, 22:03 **[ТС]**

среднее геометрическое

Добавлено через 19 минут
помогите пожалуйста!

@Ce7eH_111 · 18.12.2012, 22:05

А на единицу делить зачем???

@Boush · 18.12.2012, 22:16 **[ТС]**

незнаю! так в задании написанно

HighPredator · 18.12.2012, 22:56

А что именно в виде подпрограмм реализовывать надо?

@Boush · 18.12.2012, 23:11 **[ТС]**

среднее геометрическое

HighPredator · 18.12.2012, 23:17

Ну тогда я вас разочарую: для случаев 1 и 2 адекватно реализовать задачу нереально.

@Boush · 19.12.2012, 15:38 **[ТС]**

ну как сможите

Добавлено через 10 секунд
глядя на задание

Добавлено через 15 часов 51 минуту
помогите очень надо!!

HighPredator · 19.12.2012, 15:43

m как функция с параметрами будет выглядеть так:

Pascal
1
2
3
4
5
6
7
8
9
function m(x,y:real):real;
begin
  if x*y>0 then m:=sqrt(x*y)
  else 
    begin
      writeln('Invalid arguments');
      m:=0;
    end;
end;

Использование примерно такое:

Pascal
1
2
3
4
5
6
7
8
var
  a,b,c,res:real;
begin
  {...}
  res:=m(a,a-b)+m(a,b-c)/1+m(a+b*c,-1.15);
  writeln(res:0:4);
  readln;
end.

@Boush · 19.12.2012, 15:46 **[ТС]**

а как же делается процедура?

HighPredator · 19.12.2012, 15:52

Boush, если у вас m будет процедурой, то вы не сможете записать выражение как в задаче - придется извращаться.

Pascal
1
2
3
4
5
6
7
8
9
procedure m(x,y:real; var res:real);
begin
  if x*y>0 then res:=sqrt(x*y)
  else
    begin
      writeln('Invalid arguments');
      res:=0;
    end;
end;

Использовать в таком случае придется так:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
  a,b,c:rs:real;
  x1,x2,x3:real;
begin
  {...}
  m(a,a-b,x1);
  m(a,b-c,x2);
  m(a+b*c,-1.15,x3);
  rs:=x1+x2/1+x3;
  writeln(rs:0:4);
  readln;
end.

@Boush · 19.12.2012, 16:15 **[ТС]**

всё равно не пойму как записать программу

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19

	Решение задачи различными способами 18.12.2012, 21:10. Показов 1631. Ответов 12 Метки нет (Все метки) Помогите составить программу решения задачи! Надо решить 3 способами: 1.Процедура с параметрами 2.Процедура без параметров 3.Функция Задача: m(a,a-b)+m(a,b-c)/1+m(a+bc,-1,15) 0

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	18.12.2012, 21:15
	А что такое "m"? 0

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19
	18.12.2012, 22:03 [ТС]
	среднее геометрическое Добавлено через 19 минут помогите пожалуйста! 0

@Ce7eH_111 34 / 34 / 19 Регистрация: 17.11.2012 Сообщений: 109 Записей в блоге: 2
	18.12.2012, 22:05
	А на единицу делить зачем??? 0

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19
	18.12.2012, 22:16 [ТС]
	незнаю! так в задании написанно 0

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	18.12.2012, 22:56
	А что именно в виде подпрограмм реализовывать надо? 0

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19
	18.12.2012, 23:11 [ТС]
	среднее геометрическое 0

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	18.12.2012, 23:17
	Ну тогда я вас разочарую: для случаев 1 и 2 адекватно реализовать задачу нереально. 0

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19
	19.12.2012, 15:38 [ТС]
	ну как сможите Добавлено через 10 секунд глядя на задание Добавлено через 15 часов 51 минуту помогите очень надо!! 0

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19
	19.12.2012, 15:46 [ТС]
	а как же делается процедура? 0

@Boush 0 / 0 / 0 Регистрация: 02.12.2012 Сообщений: 19
	19.12.2012, 16:15 [ТС]
	всё равно не пойму как записать программу 0