Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Посчитать количество слов и цифр из текстового файла Помогите пожалуйста, написала программу, которая должна считать количество слов и цифр из текстового файла. Она работает, но считает цифры словами. Если убираю пробел между цифрой и словом, то все нормально. Преподаватель пытался объяснить, что нужно сделать, но я так и не поняла. Помогите пожалуйста, если можно с объяснениями, так как по дисциплине экзамен, и мне хотелось бы понять. вот сама... https://www.cyberforum.ru/ pascal/ thread1997720.html Pascal В двумерном массиве A из m строк и n столбцов вычислить сумму и количество элементов выше главной диагонали
В двумерном массиве A из m строк и n столбцов вычислить сумму и количество элементов выше главной диагонали. Проверьте,пожалуйста var a:array of integer; i,j,k:integer; sum:integer; begin if i < j then begin
Pascal Для каждого элемента с нечетным индексом найти и вывести количество цифр и их сумму https://www.cyberforum.ru/ pascal/ thread1997517.html
Дан массив целых чисел. Для каждого элемента с нечетным индексом найти и вывести количество цифр и их сумму. (с использованием пользовательских процедур или функций.)
Pascal Составить процедуру, которая, для заданного массива С из элементов формирует массив https://www.cyberforum.ru/ pascal/ thread1997391.html
Составить процедуру, которая, для заданного массива С из элементов формирует массив из элементов, для которых значение F(Ci) попадает на заданный отрезок. Сформировать одномерный массив из элементов матрицы А, абсолютная величина которых попадает на отрезок , где СА среднее арифметическое матрицы А. размерность матрицы 6х6.
Арифметическая прогрессия Pascal
Помогите исправить программу. При разных значениях d и W, значение N не меняется. MODULE АрифПрогрессия; IMPORT In, StdLog; PROCEDURE Начать*; VAR sum, a1, N, d, W: INTEGER; BEGIN In.Open; In.Int(d); In.Int(W);
Pascal Кольцевой стек https://www.cyberforum.ru/ pascal/ thread1997283.html
Есть задача: Реализуйте кольцевой стек на базе статического массива, фиксируя голову стека. Занесите в стек 10 псевдослучайных целых чисел, не превосходящих 100, причем суммируйте их в процессе генерации; затем, выталкивая их из стека, снова просуммируйте и убедитесь в совпадении сумм. Сформировать 2 процедуры занесения элемента в кольцевой стек и выталкивания элемента из стека. Никак не могу...
Pascal Определить сумму минимальных элементов нечётных строк матрицы и поменять местами первый и последний элементы Двумерный массив 12х8. Определить сумму минимальных элементов нечетных строк. В первой строке матрицы поменять местами первый и последний элементы. https://www.cyberforum.ru/ pascal/ thread1997218.html Pascal Что делает эта часть кода?
Что делает вот это? function ToStringCode(code:integer):string; // begin var s:string; if(code <>1) then // s:=ToStringCode(code div 2); Result:=s+(code mod 2); end;
Pascal Арифметические операции с комплексными числами https://www.cyberforum.ru/ pascal/ thread1996449.html
Написать программу на языке Паскаль производящую сложение,вычитание,умножение и деление двух комплексных чисел.в программе использовать подпрограмму.составить блок-схему программы.
Pascal Нет перегруженной программы с такими типами параметров Даны три файла одного и того же типа, но разного размера. Заменить содержимое самого короткого файла на содержимое самого длинного. Ошибка: нет перегруженной программы с такими типами параметров (строка 12) var Name1,Name2,Name3:String; F1,F2,F3: File; FS1,FS2,FS3 : longint; procedure ReplaceFile(NameOld,NameNew:String); var F,F_R :File; https://www.cyberforum.ru/ pascal/ thread1996026.html
Создайте новый одномерный массив из элементов двумерного массива, стоящих в столбцах, номера которых кратны 3 Pascal
Создайте новый одномерный массив из элементов двумерного массива, стоящих в столбцах, номера которых кратных 3.
Pascal Поменять местами первый и последний элемент двунаправленного списка https://www.cyberforum.ru/ pascal/ thread1995705.html
Помогите пожалуйста с задачей. Необходимо реализовать процедуру, которая меняет местами первый и последний элемент в двунаправленном списке,хотя бы уже приблизительно как будет выглядеть
0 / 0 / 0
Регистрация: 03.06.2017
Сообщений: 2
0

Число пассажиров, имеющих более 2-х вещей и число тех, у кого количество вещей превосходит среднее число вещей - Pascal - Ответ 10513811

05.06.2017, 16:47. Показов 1231. Ответов 3
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите пожалуйста, находила эту задачу в интернете, но мне нужно сделать так, чтобы программа брала данный из типизированного файла и записывала их в другой. В субботу просидела часов 5 над задачей, так ничего и не поняла.Дан файл багаж, содержащий сведения о багаже нескольких пассажиров, представляют собой запись с двумя полями: одно поле целого типа (количество вещей) и одно – действительное (вес в килограммах).Найти число пассажиров, имеющих более двух вещей и число пассажиров, количество вещей которых превосходит среднее число вещей.

Вернуться к обсуждению:
Число пассажиров, имеющих более 2-х вещей и число тех, у кого количество вещей превосходит среднее число вещей Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.06.2017, 16:47
Готовые ответы и решения:

Найти число пассажиров, имеющих более двух вещей.
Известна информация о багаже (количество вещей и общий вес багажа) 24 пассажиров. а) Найти число...

Структура: Найти число пассажиров, у которых количество вещей превосходит среднее число вещей всех пассажиров.
Program Perviu; type baggade = record kolvesh:integer; ves:real; end; var a:array of...

Определите число пассажиров, имеющих более двух вещей
Помогите, пожалуйста! Сведения о багаже каждого из пятнадцати пассажиров представляют собой запись...

Найти число пассажиров, имеющих более двух вещей
Багаж пассажира характеризуется количеством вещей и общим весом вещей. Дан массив, содержащий...

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

Найти число пассажиров, имеющих более двух вещей
Работа над файлами. Условие программы в картике (вложение)...

Найти число пассажиров, имеющих более двух вещей и число пассажиров, количество вещей которых превосходит среднее число вещей
Тема: Записи. Работа с текстовыми файлами. Дан файл f, содержащий сведения о багаже нескольких...

Найти число пассажиров, имеющих более двух вещей
Багаж пассажира характеризуется количеством вещей и общим весом вещей. Сведения о багаже каждого...

Найти число пассажиров, имеющих более двух вещей
Багаж пассажира характеризуется количеством вещей и общим весом вещей. Пусть дан массив, содержащий...

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