Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 07.11.2021
Сообщений: 12

Определить значение выражения m(а,b,с)+m(b,с,d)+m(c,d,а)

19.11.2021, 15:48. Показов 1334. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Доброго времени суток. Ребят помогите сыну решить задачку по информатике, я совсем ничего не понимаю в этих языках программированиях, староват я для этого. Очень буду благодарен за помощь!

Задачка:
Определить значение выражения m(а,b,с)+m(b,с,d)+m(c,d,а) для действительных a, b, c, d где m(x,y,z) - функция определения малого из трех чисел.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.11.2021, 15:48
Ответы с готовыми решениями:

Для выражения определить наименьшее k, при котором значение выражения становится больше заданного числа П
Для выражения exp(k)/k определить наименьшее k, при котором значение выражения становится больше заданного числа П.

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

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

3
 Аватар для mr-Crocodile
3053 / 1672 / 657
Регистрация: 19.03.2019
Сообщений: 5,380
19.11.2021, 15:57
Лучший ответ Сообщение было отмечено jk13 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
function m(x,y,z : double):double;
var t : double;
begin
  if x<y then t:=x else t:=y;
  if z<t then t:=z
  m := t
end;
var  a,b,c, d : Double;
begin
  ReadLn(a,b,c, d);
  WriteLn( m(а,b,с)+m(b,с,d)+m(c,d,а) )
end.
1
0 / 0 / 0
Регистрация: 07.11.2021
Сообщений: 12
19.11.2021, 16:30  [ТС]
Слушай, а программа не работает. Сын попробовал её запустить, а там ошибку выдаёт.
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,159
Записей в блоге: 1
19.11.2021, 16:52
Лучший ответ Сообщение было отмечено jk13 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
function m(x, y, z: Real): Real;
var t: Real;
begin
  t:=x;
  if t>y then t:=y;
  if t>z then t:=z;
  m:=t;
end;
var a, b, c, d: Real;
begin
  ReadLn(a,b,c,d);
  WriteLn(m(a,b,c)+m(b,c,d)+m(c,d,a));
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
19.11.2021, 16:52
Помогаю со студенческими работами здесь

Определить значение выражения P=n!/(1+2+3+...+n).
Помогите, пожалуйста написать прогу) для вычисления факториала написал, дальше не знаю как) #include &quot;stdafx.h&quot; ...

Определить значение выражения
Несовсем корректное задание на мой взгляд, но у друга другого нет Определить значение выражения y= Asinxе (в степени sinx) на заданном...

Определить значение выражения
Подпрограммы. Функции Определить значение выражения m(a,b,c)+m(b,c,d)+m(c,d,a) для вещественных a,b,c,d где m(x,y,z) - функция...

Определить значение выражения
Здравствуйте. Помогите, пожалуйста, решить это задание: Заранее спасибо!

Определить значение выражения 1!+2!+3!+...+n!
Определить значение выражения 1!+2!+3!+...+n!


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru