Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.80/40: Рейтинг темы: голосов - 40, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 31.03.2010
Сообщений: 44

Нахождение большего из 4 чисел a, b, c, d с использованием функции поиска большего из двух

13.04.2010, 17:19. Показов 8883. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составить программу нахождения большего из 4 чисел a,b,c,d с использованием функции поиска большего из двух
Вот программа:
Ёё надо сделать без массива и использовать подпрограмму
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
program bolshe;
var Max:real;
i:integer;C:array[1..4] of integer;
BEGIN
     Writeln('Vvedite a,b,c,d');
     Readln(c[1],c[2],c[3],c[4]);
     Max:=-50;
     for i:=1 to 4 do
          if c[i]> Max then Max:=C[i];
     writeln('Max=',Max);
     readln;
END.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
13.04.2010, 17:19
Ответы с готовыми решениями:

Составить программу нахождения большего из 4 чисел a,b,c,d с использованием функции поиска большего из двух.
Составить программу нахождения большего из 4 чисел a,b,c,d с использованием функции поиска большего из двух.

Составить программу поиска большего из четырех чисел с использованием подпрограммы поиска большего из двух
Составить программу поиска большего из четырех чисел с использованием подпрограммы поиска большего из двух.

Составить программу поиска большего из четырех чисел с использованием подпрограммы поиска большего из двух
Cоставить программу большего из четырех чисел с использованием подпрограммы поиска большего из двух.

20
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
13.04.2010, 19:38
Студворк — интернет-сервис помощи студентам
Новый вопрос - новая тема!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.04.2010, 19:38

Составьте программу поиска наибольшего из четырех чисел с использованием подпрограммы поиска большего из двух
Задача: "Составьте программу поиска наибольшего из четырех чисел с использованием подпрограммы поиска большего из двух. Рассмотрите...

Подпрограмма поиска большего из двух чисел
№1 решить используя процедуру:swoon: напишите программу поиска большего из четырёх чисел с использованием подпрограммы поиска большего из...

Определить функцию max (x, y) нахождение большего из двух чисел и вычислить выражение
Даны действительные числа a, b и c. Определить функцию max (x, y) нахождение большего из двух чисел и вычислить...

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

Нахождение суммы большего и меньшего из 5 чисел
помогите!написать программу нахождения суммы большего и меньшего из 5 чисел,паскаль


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

Или воспользуйтесь поиском по форуму:
21
Ответ Создать тему
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru