|
|
| Другие темы раздела | |
|
Pascal Зачет
https://www.cyberforum.ru/ pascal/ thread1323373.html 2 текстовых файла содержат координаты 2 параллельных контуров(создать в текстовом редакторе). Прочитать и записать их в 1 линейный список. На базе списка вычислить объем между этими двумя сечениями. Помогите пожалуйста не знаю как составить список из элементов файла. |
Pascal Присвоить значение динамическим переменным, вывести на экран, при выходе переменные удалить паскаль присвоить значение динамическим переменным вывести на экран при выходе переменные удалить. данные: p=string; T=char; St=integer; PR=-char; |
| Pascal Задание по теме "строки" С клавиатуры ввести символы. Посчитать кол-во символов >k; <k; =k. Результат выдать на экране. const k=6; var St:string; Begin Readln(St); If Length(St)<k then Writeln(' символов меньше ' ,k) else If Lenght(St)>k then Writeln( ' символов больше ' ,k) https://www.cyberforum.ru/ pascal/ thread1323284.html | Pascal В правильном треугольнике проведена средняя линия. Найти площадь образовавшейся трапеции В общем само задание: Задание 1. Составить программу для решения задачи с применением функции и процедуры пользователя. В правильном треугольнике проведена средняя линия. Найти площадь образовавшейся трапеции, дважды используя функцию вычисления площади правильного треугольника по формуле: s=\frac{a^2\sqrt{3}}{4} В общем сделал я вот так: program Lab4ex1; https://www.cyberforum.ru/ pascal/ thread1323238.html |
|
Pascal Список и вывод информации Имеем текстовый документ с определенным количеством студентов и 4 оценки по разным предметам. На выходе должны быть указаны отличники по всем предметам. В конце сделать подсчет полных отличников. Пример: A B C 5 5 5 5 17/7/1991 B A C 4 4 5 4 10/5/1990 C B A 3 4 5 4 12/12/1992 C A B 5 5 5 5 13/3/1991 1ый предмет: A B C 17/7/1991 |
Pascal Графика, буквы 2D И 3D
https://www.cyberforum.ru/ pascal/ thread1322999.html За данным примером реализовать букву 'Л' в 2D и 3D. Пример с буквой 'Ш': uses graphabc; procedure p2d; begin setbrushcolor(clperu); fillrect(120,300,500,350);//shpala fillrect(120,350,170,100);//\\1 stovp fillrect(285,350,335,100);//\\2stovp90 fillrect(450,350,500,100);//3stovp end; |
| Pascal Изменить текст входящего текстового файла так, чтобы в исходящем файле не оставалось пустых строк написать программу которая превращает текст входящего текстового файла так, чтобы в исходящем файле не оставалось пустых строк. https://www.cyberforum.ru/ pascal/ thread1322948.html |
Pascal Устранить из последовательности символов все группы трех смежных букв "АВС" Устранить из последовательности S1. . . Sn все группы трех смежных букв АВС . Добавлено через 30 минут я нашёл решение, как тему удалить? |
|
Pascal Провести частотный анализ текста: посчитать, сколько различных символов встречается в данном тексте
https://www.cyberforum.ru/ pascal/ thread1322887.html 4.19. Файл содержит информацию в виде символьных строк произвольной длины. Провести частотный анализ текста: посчитать, сколько различных символов встречается в данном тексте. В новый файл записать информацию в виде гистограммы: символ + количество *, равное числу этих символов в тексте. Пример: А ********************** (символ ‘А’ встречается в тексте 22 раза) В ************ (символ ‘В’... |
Pascal Типизированный файл состоящий из множеств. Процедура ввода
https://www.cyberforum.ru/ pascal/ thread1322829.html Написал процедуру ввода но она не обнуляет заносимое множество в файл. Всего в файл заносится 5 множеств по 3 элемента в каждом. Так вот если я ввожу 123 в первое, 456 во второе, то выдает он: 123 123456 Обнуление я воткнул, но все равно не пашет. У меня уже ночь, а это 12-я программа за день и я уже не соображаю, ребят, помогите. Что не так? Прикладываю еще и процедуру вывода, для... |
|
Pascal Добавить к последовательности наименьшее число символов так, чтобы последовательность стала палиндромом Даны натуральное число N и символы S,...,S.Преобразовать последовательность S,...,S, добавив к ней наименьшее число символов S,...,S так, чтобы последовательность S,...,S стала палиндромом: S=S,S=S и т.д. |
Pascal Построение траектории
https://www.cyberforum.ru/ pascal/ thread1322807.html Составте программу для ввода координат движущейся точки и построения траектории движения |
|
0 / 0 / 0
Регистрация: 19.10.2014
Сообщений: 17
|
|
| 0 | |
Программа, которая дописывает в файл 5 введенных целых чисел, а затем подсчитывает сумму всех чисел в файле - Pascal - Ответ 695828108.12.2014, 16:24. Показов 1743. Ответов 1
Метки (Все метки)
Напишите хотя бы кусочек программы, очень нужно! Вернуться к обсуждению: Программа, которая дописывает в файл 5 введенных целых чисел, а затем подсчитывает сумму всех чисел в файле Pascal
0
|
|
| 08.12.2014, 16:24 | |
|
Готовые ответы и решения:
1
1) Подсчитать произведение и количество всех неотрицательных чисел из 10 не целых чисел, введенных пользовател
|
| 08.12.2014, 16:24 | |
| 08.12.2014, 16:24 | |
|
Помогаю со студенческими работами здесь
0
Вводится последовательность из n целых чисел найти сумму всех нечетных чисел
Программа просит вас ввести пять чисел a1, b1, c1, d1, e1 и найти сумму положительных чисел из введенных чисел |