Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Массив через записи! ЦЕЛЬ ТАКАЯ!!! : Написать программу через записи ___________________________________________________________________________________________ ЗАРАНЕЕ СПАСИБО!!! ___________________________________________________________________________________________ ТЕКСТ ЗАДАЧИ: На вход программе сначала подается число участников олимпиады N. В каждой из следующих N строк находится результат одного из... https://www.cyberforum.ru/ pascal/ thread142292.html Pascal процедуры и функцый
даны действительные числа s,t. Получить g(1.2,s)+g(t,s)-g(2s-1,st), где g(a,b)=a2(в кварате)*b2/a2*2ab*3b2*4 помогите пожалуйста решить!! через 3 дня зачет!!
Pascal Не могу найти ошибку!! не могу не как разобраться! надо до завтра. условие: Для 7 человек, среди которых есть мужчины и женщины, хранятся следующие данные: имя, пол (true - мужской, false - женский), рост.Опишите логическую функцию Test(G), проверяющую, что в группе самая высокая из женщин ниже самого высокого из мужчин. Мое решение: uses crt; type name = (Mary, Jane, Kim, Bob, Jan, Pit, Tom); data = record male : boolean; https://www.cyberforum.ru/ pascal/ thread142286.html Pascal Определить суммарный обьем в литрах 12 вложенных друг в друга шаров решите пожалуйста))))Определить суммарный обьем в литрах 12 вложенных друг в друга шаров со стенками 5мм.Ввнутренний диаметр внутреннего шара равен 10 см. считать, что шары вкладываются друг в друга без зазоров. Добавлено через 15 часов 55 минут uses crt; var i:integer; v,r:real; begin r:=10; for i:=1 to 12 do https://www.cyberforum.ru/ pascal/ thread142274.html
Поиск однофамильцев в текстовом файле Pascal Pascal
Дан файл с данными: Фамилия Имя Отчество. Используя Pascal, Найти в нем однофамильцев. Если присутствуют, значит вывести сообщение о том, что однофамильцы есть.
Pascal решите пожалуйста))))дано комплексного число w.найти сумму первых помогите пожалуйста дано комплексного число w.найти сумму первых десяти членов разложения в ряд функции комплексного переменного e^w*w, используя следующее разложение: sin z=z/1!-(z^3)/3!+(z^5)/5!-(z^7)/7!+... зарание спасибо https://www.cyberforum.ru/ pascal/ thread142264.html
Pascal Обработка текстового файла https://www.cyberforum.ru/ pascal/ thread142257.html
Задание: программа должна создавать текстовый файл на 7 строчек. А потом считать файл и вывести на экран вторые слова с каждой строчки. Вот я набросал начало программы: program lab_3; uses crt; const n=7; var f:text; s:^string; fname:string; begin clrscr; write('Vvedite imya fayla (20 simvolov): '); {vvod imeni fayla}
вывести на экран все гласные буквы,которые не входят более чем в одно слово. Pascal
вывести 4 слова на русском языке. вывести на экран все гласные буквы,которые не входят более чем в одно слово. Создание множеств офомить в виде процедур.
Pascal Работа с файлами. выполнить следующее задание используя типизированные файлы (вывод исходного и вновь создаваемого файлов осуществить програмным путем). создать файл,компоненты которого случайные числа. подсчитать сколько из них нечетных и кратных трем. создать новый файл,содержащий такие числа. Добавлено через 17 минут То есть вот так правильнее: Работа с файлами. выполнить следующее задание используя типизированные файлы (вывод исходного и вновь создаваемого файлов... https://www.cyberforum.ru/ pascal/ thread142236.html Pascal Процедуры! https://www.cyberforum.ru/ pascal/ thread142235.html
«Использование подпрограмм». Создание функции Даны натуральные числа n, a1,…,an, где n≤5000. Найти члены ak последовательности a1,…,an, кратные 3 и не кратные 5, и определить их количество. Вот код этой программы без процедур и функций) uses crt; var a:array of integer; n,i,k:integer; begin clrscr;
Найти сумму простых чисел от 1 до а Pascal
HELP ME!!!! предложить самый оптимальный алгоритм определения, является ли n простым числом. оформить этот алгоритм в виде функции. program hjk; var s,m,p,n,a:integer; begin read(a); for n:=1 to a do begin
Pascal Работа с Case https://www.cyberforum.ru/ pascal/ thread142229.html
Ребят слушайте вот я вроде проги пишу а одного не понимаю так это оператор case и как с ним работать как то раз понял и опять запутался вы не могли бы мне помоч и написать самую простую программу с использованием этого оператора буду оч признателен если там будут подробные коментарии Заранее спасибо
167 / 94 / 11
Регистрация: 16.04.2010
Сообщений: 464
07.06.2010, 22:04 0

Для 7 человек, среди которых есть мужчины и женщины, хранятся следующие данные: имя, пол (true - мужской, false - женский), рост.Опишите логическую ф - Pascal - Ответ 787074

07.06.2010, 22:04. Показов 2889. Ответов 11
Метки (Все метки)

Ответ

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

Вернуться к обсуждению:
Для 7 человек, среди которых есть мужчины и женщины, хранятся следующие данные: имя, пол (true - мужской, false - женский), рост.Опишите логическую ф Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.06.2010, 22:04
Готовые ответы и решения:

В группе из 25 человек (мужчины и женщины) определить средний рост женщин
Программу записать на языке Pascal с использованием процедур (функций) Всем,заранее, спасибо!!!

Мужской и женский пол
Разработать приложение для определения подходящего возраста кандидатуры для вступления в брак,...

В структуре хранятся следующие данные об учениках: фамилия, имя, отчество, рост, масса. Создать массив стру
В структуре хранятся следующие данные об учениках: фамилия, имя, отчество, рост, масса. Создать...

В файл вводятся имена, пол и рост человека. Программа считывает данные из файла и выдает совпадения если в нем есть мужчины одного роста. Тема:работа
В файл вводятся имена, пол и рост человека. Программа считывает данные из файла и выдает совпадения...

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

С помощью структуры определить группу из 7 человек, имя, пол и рост
С помощью структуры определить группу из 7 человек.имя пол и рост. вывести самую высокую девочку...

В анкетных данных обозначены фамилия, пол, рост. Определите средний рост женщин, фамилию самого высокого мужчины
Помогите, пожалуйста, с написанием кода. Задание: В анкетных данных обозначены фамилия, пол,...

Определите структуру данных, которая описывает студента и включает следующие данные: фамилия, пол, рост, групп
Определите структуру данных, которая описывает студента и включает следующие данные: фамилия, пол,...

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

Записи: Даны рост и пол 20 человек. Найти средний рост всех мужчин
Помогите решить задачу на паскале,используя списки(record).Даны рост и пол 20 человек.Найти средний...

Известны вес, пол, рост каждого из 22 человек. Найти общую массу и средний рост мужчин.
Помогите с задачей Известны вес, пол, рост каждого из 22 человек. Найти общую массу и средний...

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