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

Написать программу на Паскале нахождения u=max(a,b,c)-min(a,b,c)

27.10.2010, 17:37. Показов 4779. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите написать программу очень надо
Найти u=max(a,b,c)-min(a,b,c)
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
27.10.2010, 17:37
Ответы с готовыми решениями:

Написать программу, которая вычисляет значение выражения u = max(x,y,z)^2 - min(x,y,z)^2 / (max(x,y,z) + min(x,y,z))^2
Написать программу которая проверяет по заданным трем значениям x,y,z и вычисляет следующее выражение ...

Написать функцию нахождения min и max
Составить алгоритм и программу для вычисления задания без использования массивов. Исходные данные должны вводиться последовательно с...

Написать программу min(A1, B1) + max(A2, B2) + min(A3, B3) + max(A1, A3)
Написать программу для вычисления выражения: min(A1, B1) + max(A2, B2) + min(A3, B3) + max(A1, A3). Числа A1, A2, A3, B1, B2, B3...

3
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
27.10.2010, 17:47
Pascal
1
2
3
4
5
6
7
function maxi(var a,b,c:integer):integer;
begin
max:=a;
if max>b then max:=b;
if max>c then max:=c;
maxi:=max;
end;
Pascal
1
2
3
4
5
6
7
function mini(var a,b,c:integer):integer;
begin
min:=a;
if min<b then min:=b;
if min<c then min:=c;
mini:=min;
end;
1
0 / 0 / 0
Регистрация: 27.10.2010
Сообщений: 3
27.10.2010, 18:43  [ТС]
А если задание выглядет так max(a,b^2,c)-min(a^2,b,c)
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
27.10.2010, 18:51
да тоже самое и будет.вставь функии,введи в основном теле три числа. и вычисли
Pascal
1
y:=maxi(a,sqr(b),c)-mini(sqr(a),b,c);
и выведи значение y
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
27.10.2010, 18:51
Помогаю со студенческими работами здесь

написать программу нахождения максимольного среди min(a,b) и min(c,d). Не используя function
В задаче нужно найти max{min(a,b),min(c,d)}. Не пойму как нужно прописать в программе эти условия,помогите пожалуйста! :cry:

Составить программу нахождения корня квадратного разности max и min чисел
Program Var a,b,s:real; Begin Readln (max,min,s); Of a&gt;b then writeln (a=max); Else writeln (a=min) If b&gt;a then writeln...

По заданным значениям x, y, z вычислить значения u: u=min (x, max(y, z). Для расчета написать функции max(x, y) и min(x
По заданным значениям x, y, z вычислить значения u: u=min (x, max(y, z)). Для расчета написать функции max(x, y) и min(x, y).

Процедура: Даны три числа a,b,c. Вычислить (max(a,b)+min(a,c))/(max(b,c)*min(a,b))+max(min(a,b),min(b,c))
Даны три числа a,b,c. Вычислить (max(a,b)+min(a,c))/(max(b,c)*min(a,b))+max(min(a,b),min(b,c)) с помощью использования процедур.

Помогите пожалуйста написать программу min(x+5y+z,2x-y+z)+max(x+y+z,xy+z)
Помогите пожалуйста написать программу min(x+5y+z,2x-y+z)+max(x+y+z,xy+z) Добавлено через 39 минут ну помогите же очень срочно...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
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 Использованы. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru