|
|
Другие темы раздела | |
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 - Ответ 78707407.06.2010, 22:04. Показов 2889. Ответов 11
Метки (Все метки)
Ответ
У тебя по умолчанию функция false. Потом она просто не меняется, поэтому и выводится один из вариантов.
Можно сделать флаг, который будет контролировать наличие разных полов Вернуться к обсуждению: Для 7 человек, среди которых есть мужчины и женщины, хранятся следующие данные: имя, пол (true - мужской, false - женский), рост.Опишите логическую ф Pascal
0
|
07.06.2010, 22:04 | |
Готовые ответы и решения:
11
В группе из 25 человек (мужчины и женщины) определить средний рост женщин Мужской и женский пол В структуре хранятся следующие данные об учениках: фамилия, имя, отчество, рост, масса. Создать массив стру В файл вводятся имена, пол и рост человека. Программа считывает данные из файла и выдает совпадения если в нем есть мужчины одного роста. Тема:работа |
07.06.2010, 22:04 | |
07.06.2010, 22:04 | |
Помогаю со студенческими работами здесь
0
С помощью структуры определить группу из 7 человек, имя, пол и рост В анкетных данных обозначены фамилия, пол, рост. Определите средний рост женщин, фамилию самого высокого мужчины Определите структуру данных, которая описывает студента и включает следующие данные: фамилия, пол, рост, групп Известны рост и пол нескольких человек. Найти средний рост мужчин Записи: Даны рост и пол 20 человек. Найти средний рост всех мужчин Известны вес, пол, рост каждого из 22 человек. Найти общую массу и средний рост мужчин. |