Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Определить номер дня в месяце. https://www.cyberforum.ru/ pascal/ thread73825.html
С начала 1990 года по некоторый день прошло n месяцев и 2 дня (n или равно 1) Присвоить целочисленой велечине х 1,2,3...11,12 в зависимости от того каким месяцем являеца месяц этого дня например n =3 значение х равно 4 n равно 20 значение х равно 9. Добавлено через 6 минут ой там в начале n больше или равно 1 )
Pascal Найти первую цифру дробной части вещественного числа.Например для числа 23,109-это цифра 1
Найти первую цифру дробной части вещественного числа.Например для числа 23,109-это цифра 1
Pascal Найти сумму первых трех цифр дробной части вещественного числа.например для числа 23,16809 она равна 15 Найти сумму первых трех цифр дробной части вещественного числа.например для числа 23,16809 она равна 15 https://www.cyberforum.ru/ pascal/ thread73820.html Pascal Найти в тексте все пары слов, каждое из которых можно получить перестановкой букв второго слова дан русский текст.Найти в тексте все пары слов ,каждое из которых можно получить перестановкой букв второго слова. Например,слова "слово", "волос" образуют такую пару. Прошу помощи:umnik: https://www.cyberforum.ru/ pascal/ thread73818.html
В массиве из 23 элементов найти сумму элементов, отличных от последнего элемента. Pascal
1. а) В массиве из 23 элементов найти сумму элементов, отличных от последнего элемента. Б) Дан массив из 40 элементов. Найти количество элементов, меньших первого элемента. В) Дан одномерный массив на 23 элемента. Подсчитать количество положительных элементов, следующих за первым отрицательным элементом. 2. а) В массиве из 16 элементов найти среднее арифметическое положительных...
Pascal Даны действительные числа https://www.cyberforum.ru/ pascal/ thread73811.html
Даны действительные числа a,b,c (a не равно 0). Выяснить, имеет ли уравнение ax^2+ bx+c=0 действительные корни. Если действительные корни имеются, то найти их. В противном случае ответом должно служить сообщение, что действительных корней нет. Заранее спасибо)))
Pascal Требуется построить и распечатать множество, элементами которого являются встречающиеся в последовательности цифры от '0' до '3' и буквы 'A'..'F' Дана непустая последовательность символов. Требуется построить и распечатать множество, элементами которого являются встречающиеся в последовательности цифры от '0' до '3' и буквы 'A'..'F'. Прошу помочь.:) https://www.cyberforum.ru/ pascal/ thread73810.html Подсчитать количество цифр в данном числе Pascal
Дано натуральное число N.Подсчитать количество цифр данного числа
Pascal Составить программу, вычисляющую периметр квадрата по указаному значению его площади. Составить программу вычесляющую периметр квадрата по указаному значению его площади. https://www.cyberforum.ru/ pascal/ thread73806.html Pascal Напечатать в алфавитном поpядке все согласные буквы,котоpые не входят ни в одно слово Дан текст из pусских букв,за котоpым следует точка. Между соседними словами запятая.Напечатать в алфавитном поpядке все согласные буквы,котоpые не входят ни в одно слово (Согласные буквы: б,в,г,д,ж,з,л,м,н,p,к,п,с,т,ф,х,ц,ч,ш,щ) Зарание спасибо! https://www.cyberforum.ru/ pascal/ thread73804.html
Pascal Прочитать последовательность из файла и создать стек в памяти
В файл записывается последовательность целых чисел. Прочитать последовательность из файла и создать стек в памяти из этих чисел таким образом, чтобы на вершине стека было самое большое число. Удалить из стека все отрицательные элементы. Оформить удаление в виде процедуры. Вывести исходный и результирующий стеки на экран. Пожалйста помогите!!!!
Pascal Работа с записями Помогите пожалуйста... С клавиатуры вводится 4 даты. Программа должна вывести все осенние даты и самую раннюю дату. У меня есть кусок программы, но чтото не получается, не могу разобраться....помогите доделать пожалуйста type dat=record data:integer; mes:integer; god:integer; end; var https://www.cyberforum.ru/ pascal/ thread73792.html
1915 / 1065 / 384
Регистрация: 06.12.2008
Сообщений: 2,802
13.12.2009, 13:42 0

получить min (x,y,z) - Pascal - Ответ 412244

13.12.2009, 13:42. Показов 2507. Ответов 7
Метки (Все метки)

Ответ

Не по теме:

:D:D



Вернуться к обсуждению:
получить min (x,y,z) Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.12.2009, 13:42
Готовые ответы и решения:

Получить t=min(k+n,n/k), v=min(3kn, k+2n2), g=min (t-v, t/v)...
Даны действительные числа k, n. Получить t=min(k+n,n/k), v=min(3kn, k+2n2), g=min (t-v, t/v)

Дано действительные числа a,b. Получить u= min(a,b), v=min(a b, a+b), w=mm(u+v, 3.14)
Дано действительные числа a,b. Получить u= min(a,b), v=min(a b, a+b), w=mm(u+v2, 3.14) Помогите...

Даны действительные числа a, b. Рассчитать Y=min(a,b), Y1=min(min(a*b,a+b), min(a2 –b*a,b3-3*a)
Даны действительные числа a, b. Рассчитать Y=min(a,b), Y1=min(min(a*b,a+b), min(a2 –b*a,b3-3*a)),...

Подпрограммы: Получить u = min(a, b), v = min(ab, a+b), min(u+v(в квадрате), 3,1415926)
Даны действительные числа a, b. Получить u = min(a, b), v = min(ab, a+b), min(u+v(в квадрате),...

7
13.12.2009, 13:42
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.12.2009, 13:42
Помогаю со студенческими работами здесь

Даны действительные числа a, b. Получить u=min(a,b-a), y=min(ab,a+b), k=min(u+v2,3.14).
1. Здравствуйте. Даны действительные числа a, b. Получить u=min(a,b-a), y=min(ab,a+b),...

Даны действительные числа a b c получить f:=(min(a,b)+min(a,c))/(1+min(a+bc,5)).
даны действительные числа a b c получить f:=(min(a,b)+min(a,c))/(1+min(a+bc,5)) для вычисления...

Дан массив А (N). Получить min (ai ,2a2 ,3a3 ,...,n an). Вывести исходный и результирующий массивы и значение min.
Дан массив А (N). Получить min (ai ,2a2 ,3a3 ,...,n an). Вывести исходный и результирующий массивы...

Получить u=min(a,b), v=min(ab,a+b), min(u+v, 3.14)
даны действительные числа а,в. Получить u=min(a,b) , v=min(ab,a+b) , min(u+v, 3.14)

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