|
|
| Другие темы раздела | |
| Turbo Pascal Написать программу вычисления периметра и площади треугольника, используя процедуру и функцию Здравствуйте! Обращаюсь за помощью. Никак не получается написать следующую программу: Написать программу вычисления периметра и площади треугольника на PASCAL. Стороны треугольника a,b,c ввести с клавиатуры. Вычисление площади треугольника оформить функцией, вычисление периметра - процедурой. Я пробовала написать, но тщетно. В общем, мои попытки кончились этим: Program P1; var... https://www.cyberforum.ru/ turbo-pascal/ thread1731244.html |
Выбрать такие номера дорог, чтобы мост через реку, соединяющий дороги, имел минимальную длину Turbo Pascal Имеется N дорог, приходящих к левому берегу реки и M дорог, приходящих к правому берегу реки. Надо выбрать такие номера дорог, чтобы мост через реку, соединяющий эти дороги, имел минимальную длину. В случае неоднозначности ответа: - из пары с разными номерами левых дорог, выбираем ту, у которой меньший номер левой дороги - из пары с разными номерами правых дорог, выбираем ту, у которой меньший... |
| Turbo Pascal Использование типа данных «объект» Составить программу для решения этого кода с использованием типа данных «объект». uses crt,graph; var x,y,r,a,x0:integer; procedure Trg(x,y,d:integer); var ax,ay,bx,by,cx,cy:integer; begin ax:=x;ay:=y-d; bx:=x-round(d*cos(pi/6));by:=y+round(d*sin(pi/6)); cx:=x+round(d*cos(pi/6));cy:=y+round(d*sin(pi/6)); line(ax,ay,bx,by); https://www.cyberforum.ru/ turbo-pascal/ thread1731152.html | Turbo Pascal Работает ли TP на Windows 10? у меня выдает ошибку при открытии версии 7.0. https://www.cyberforum.ru/ turbo-pascal/ thread1731128.html |
|
Напишите функцию Schetchik, которая будет считать среднее арифметическое цифр Turbo Pascal В функцию передаётся строка S, в ней есть и пробелы и слова. Пробелы могут быть в любом месте. Есть слова в которых последний символ это цифра . Напишите функцию Schetchik, которая будет считать среднее арифметическое этих цифр. Строка 5zxcv yuio9 sdfgg poi7 rgn 9876 8 Ответ 7.5 Var S:string; Sred:real; Begin |
Turbo Pascal Определить расстояние между двумя точками ломанной на плоскости Определить расстояние между двумя точками ломанной на плоскости для вычисления наибольшей цепи ломанной, заданной координатами ее вершин. Входные данные: A(-2,-3); B(1,4); C(4,5); D(7,7). https://www.cyberforum.ru/ turbo-pascal/ thread1730994.html |
| Turbo Pascal Проверить, есть ли в группе хотя бы два человека одного роста и вывести их имена Написать программу, использующую логическую функцию rost(gr), проверяющую, есть ли в группе gr хотя бы два человека одного роста и вывести их имена https://www.cyberforum.ru/ turbo-pascal/ thread1730850.html |
В последовательности все неотрицательные члены, не принадлежащие отрезку [1, 2], заменить нулями Turbo Pascal даны натуральное число n, действительные числа a1, a2 ...an. в последовательности a1, a2 ...an все неотрицательные члены, не принадлежащие отрезку заменить нулями. Задача построить блок-схему и записать на алгоритмическом языке. |
| Turbo Pascal метод QuickSort Отсортировать методом QuickSort односвязный список, содержащий целые числа, меняя указатели (без обмена самими значениями). https://www.cyberforum.ru/ turbo-pascal/ thread1730816.html | Turbo Pascal Найти слова, состоящие из минимального и максимального количества символов Составить программу ввода и обработки текста из нескольких предложений согласно заданию. При этом считать, что число предложений и число строк могут не совпадать, каждое слово находится целиком в одной строке, ввод строки завершается нажатием клавиши ENTER, точка – конец предложения. Из слов, входящих в предложение (предложения) максимальной длины найти слова, состоящие из минимального и... https://www.cyberforum.ru/ turbo-pascal/ thread1730794.html |
|
Вывести на экран количество символов, обозначающих арифметические операции Turbo Pascal Вводится строка. Программа выводит на экран количество символов, обозначающих арифметические операции: «+», «-», «*», «/». Опишите функцию CalcOp. var s: string; ... |
Turbo Pascal Стек с защитой
https://www.cyberforum.ru/ turbo-pascal/ thread1730765.html Реализуйте структуру данных "стек". Напишите программу, содержащую описание стека и моделирующую работу стека, реализовав все указанные здесь методы. Программа считывает последовательность команд и в зависимости от команды выполняет ту или иную операцию. После выполнения каждой команды программа должна вывести одну строчку. Возможные команды для программы: push n Добавить в стек число n... |
 6810 / 4567 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
|
|
| 10.05.2016, 17:31 | 0 |
Написать программу вычисления произведения чётных элементов одномерного массива - Turbo Pascal - Ответ 912112610.05.2016, 17:31. Показов 1427. Ответов 2
Метки (Все метки)
Ответ
Написать процедуру получения произведения четных элементов одномерного массива
Вернуться к обсуждению: Написать программу вычисления произведения чётных элементов одномерного массива Turbo Pascal
0
|
|
| 10.05.2016, 17:31 | |
|
Готовые ответы и решения:
2
Написать процедуру получения произведения четных элементов одномерного массива Составить программу вычисления произведения нечетных элементов массива
|
| 10.05.2016, 17:31 | |
| 10.05.2016, 17:31 | |
|
Помогаю со студенческими работами здесь
0
Составьте программу вычисления суммы элементов одномерного массива составить алгоритм и программу вычисления значений элементов одномерного массива X1,X2, ..., Xm-1 Составьте программу вычисления суммы пяти первых элементов одномерного массива A(N)
|