|
|
Другие темы раздела | |
Pascal Заменить все положительные элементы вектора на их округленные целые и отсортировать в порядке убывания
https://www.cyberforum.ru/ pascal/ thread124265.html Дан вещественный вектор A .Заменить все положительные элементы вектора на их округленные целые и отсортировать в порядке убывания.Вычислить среднее арифметическое положительных элементов.Вывести на экран отсортированный массив и вычисленное значение. |
Pascal Прайс(на файлы и записи) Дан фан prices.txt, содержащий цены московских комп.фирм и имеющий след формат: <Название фирмы> Корпус <цена> Материнская плата <цена> Монитор <цена> Принтер <цена> Количество записей(фирм) любое. Разработать программу, позволяющую решить проблемы с интерфейсом. |
Pascal Переписать фрагмент текста в отдельную строку Помогите, пожалуйста, с программкой( NewCopy – выделение строки с заданного начального символа до заданного конечного символа NewDelete – удаление подстроки с начальной позиции до конечной позиции MyPos – определение первого вхождения подстроки MyDown(строка) все буквы – строчные. Дан текст содержащий фрагмент в круглых скобках. Переписать этот фрагмент в отдельную строку и сделать все... https://www.cyberforum.ru/ pascal/ thread124216.html | Pascal Рекурсивная подпрограмма Дана последовательность ненулевых целых чисел, за которой следует 0. Напечатать сначала все отрицательные числа этой последовательности, а затем все положительные (в любом порядке). Помогите пожалуйста! https://www.cyberforum.ru/ pascal/ thread124184.html |
Pascal Паскаль-график-как строить оси Привет. Объясните пож.неопытному человеку: 1)как построить оси координат(вместе с направлениями х и у, и так сказать "шкалой") 2)как сделать чтоб график соответствовал этим точкам(отсечкам на осях) график ф-ции y=e^(-(x^2)) спасибо заранее |
Pascal двумерные массивы Дана матрица M x N. Элементы, у которых сумма номеров строки и столбца четные оставить без изменения, а остальные разделить на максимальный по модулю элемент соответствующей строки. https://www.cyberforum.ru/ pascal/ thread124164.html |
Pascal Определить общее количество операций суммы (+), разницы(-) и умножения(*) в заданом арифметическом примере
https://www.cyberforum.ru/ pascal/ thread124161.html Срочно!!! Помогите решить задачки!!! Экзамен!!! 1. Определить общее количество операций суммы (+), разницы(-) и умножения(*) в заданом арифметическом примере. 2. Задано одновымерный масив А целых чисел, пронумерованых от 1 до h. Увеличить на 2 значения неотрецательных елементов масиву. 3. Задано одновымерный масив А целых чисел, пронумерованых от 1 до h. Определить первый елемент масиву,... |
Pascal Записи и базы данных! (1)Дано несколько арифметических выражений,содержащих знаки операций,дробные числа,имена переменных.Во всех дробях,имеющих менее 2 цифр в дробной части дописать ещё по 2 цифры,распечатать исходные и полученые выражения. (2)В шахматном турнире приняли участие 5 шахматистов.Ввести в память ПК следующую информацию:ФИО и результаты игр.Каждый шахматист провёл четыре встречи (победа-1... |
Pascal Обработать файл так, что бы начала шли все положительные, а затем <= 0 компоненты.
https://www.cyberforum.ru/ pascal/ thread124149.html {Обработать файл так, что бы начала шли все положительные, а затем <= 0 компоненты. Ввод-вывод данных файла опустил, там понятно. А здесь если в файле все положительные числа - все ОК, попадется отрицательное -"файл не открыт" (103 ошибка)} Procedure inv (var f: fint); var k, i, j, p, x, y: integer; g: boolean; begin {$I-} reset (f); {$I+} if ioresult =0 then begin writeln... |
Pascal Четные vs Нечетные.
https://www.cyberforum.ru/ pascal/ thread124145.html Срочно надо написать программу для экзамена. Помогите. Вам задан отрезок от a до b.Определите, каких чисел больше: четных или нечетных. |
Pascal Найти минимальные элементы массивах среди элементов, имеющих четный индекс Program Example; uses crt; Type mas=array of Integer; var a,m: mas; n,s,k,mini: Integer; Procedure Vvod(var a: mas); var i: Integer; begin Writeln('Введите количество элементов'); Readln(k); |
Pascal Определить след (сумма диагональных элементов) матрицы 1)Ввести матрицу А(m,n),m<>n.Выполнить сортировку элементов каждой строки по возврастанию.Вывести с пояснением исходную и преобразованую матрицу. и 2)Дано n квадратных матриц произвольных размеров.Определить след (сумма диагональных элементов) каждой матрицы и распечатать матрицу с минимальным следом. Помогите решить... https://www.cyberforum.ru/ pascal/ thread124134.html |
0 / 0 / 1
Регистрация: 01.05.2010
Сообщений: 12
|
|
0 | |
Программа вычисления расстояния между двумя точками с заданными координатами - Pascal - Ответ 69876001.05.2010, 23:41. Показов 32855. Ответов 3
Метки (Все метки)
Напишите программу вычисления расстояния между двумя точками с заданными координатами X1,Y1, X2,Y2, с использованием подпрограммы- процедуры.
Вернуться к обсуждению: Программа вычисления расстояния между двумя точками с заданными координатами Pascal
0
|
01.05.2010, 23:41 | |
Готовые ответы и решения:
3
Найти расстояние между двумя точками с заданными координатами Найти расстояние между двумя точками с заданными координатами Найти расстояние между двумя точками с заданными координатами Найти расстояние между двумя точками с заданными координатами |
01.05.2010, 23:41 | |
01.05.2010, 23:41 | |
Помогаю со студенческими работами здесь
0
Определить расстояние между двумя точками, заданными своими координатами Функция вычисления расстояния между двумя точками на плоскости Определить функцию вычисления расстояния между двумя точками задаными своими координатами Определить процедуру вычисления расстояния между двумя точками, заданными координатами |