|
|
Другие темы раздела | |
PascalABC.NET Как преобразовать числа типа Decimal к Real? В некоторых случаях, например в астрономических расчетах, чтобы не потерять точность арифметические операции можно делать с числами типа decimal. А обработку результатов лучше проводить используя стандартные подпрограммы с real. Как преобразовать? Простой пример, когда разность двух близких чисел в real дает ошибку.var c,d:decimal; a,b,ra:real; Begin a:=1.0/3.0; b:=a; https://www.cyberforum.ru/ pascalabc-net/ thread1957330.html |
Ошибка времени выполнения: Чтение после конца потока невозможно PascalABC.NET Нужно найти элемент с минимальным количеством неуд. оценок по выбранному предмету и поменять с последним элементом тип. файла. Ошибка в 50 строке procedure find(); var tdata: data; f: file of data; zdata1,zdata2: data; file_name: string; isfile: boolean; vpredm: predmet; ispredmn: boolean; |
PascalABC.NET Не могу найти ошибку. Нажимаю на клавишу, выдает ошибку uses ABCObjects,GraphABC; const Image_0 = '0_765e9_6a3e424a_S.png'; var p:PictureABC;speed:integer; procedure KeyDown(Key:integer); begin case Key of VK_Left : begin p.Left:=p.Left + speed ; https://www.cyberforum.ru/ pascalabc-net/ thread1956802.html |
PascalABC.NET Сортировка знаков препинания в строках
https://www.cyberforum.ru/ pascalabc-net/ thread1956497.html Добрый день, форумчане! У меня есть рабочая программа, которая сортирует в тексте слова в алфавитном порядке, но если там есть разные знаки препинания, то их тоже надо отсортировать. Я пробовал сам что-то писать, но всё в пустую, окончательно запутался в этих строках. Смотрел этот и другие разные сайты/форумы, но ничего подобного так и не нашел. Помогите, пожалуйста, написать код программы для... |
Побочный эффект в подпрограмме PascalABC.NET Добрый день, форумчане! Помогите, пожалуйста, я написал программу, где надо определить, какой из векторов имеет наибольшую длину, но у меня глобальные переменные используются в функциях и из-за этого возникает побочный эффект, помогите его убрать! { Задача: Дана вещественная квадратная матрица A порядка n, n-мерный вещественный вектор x. Среди векторов x, Ax, Ax – x, найти тот,... |
PascalABC.NET Протабулировать функцию
https://www.cyberforum.ru/ pascalabc-net/ thread1956365.html Используя метод нисходящего проектирования, разработать схему алгоритма и составить программу вычисления функции в стиле тр: |
PascalABC.NET Работа с двумерным массивом в подпрограммах
https://www.cyberforum.ru/ pascalabc-net/ thread1956327.html Дана квадратная действительная матрица. Отсортировать по возрастанию все строки, содержащие нулевые элементы. Формирование, вывод двумерного массива, определение необходимости сортировки строки и саму сортировку строки осуществлять в подпрограммах. *для решения лучше использовать двумерный массив как совокупность одномерных |
PascalABC.NET Программа не выполняется до конца. В чем причина? Здравствуйте, составил программу для нахождения корня функции. При небольшом количестве итераций (пример а=0, b=1, h=0.1, ex=0.001) программа выполняется полностью и правильно. Но при вводе большого отрезка (пример а=0, b=100, h=0.1, ex=0.001) программа останавливается на моменте: the solution is on , хотя должна выводить еще следующие данные. Чем это может быть обусловлено и как это можно... |
PascalABC.NET Как выводить вещественные очень маленькие числа до первой значащей цифры после запятой?
https://www.cyberforum.ru/ pascalabc-net/ thread1956019.html Есть матрица хранящая достаточно малые вещественные числа(меньше 1). Есть ли способ выводить ее элементы так, что бы значение элементов матрицы выводилось ровно до первой значащей цифры после запятой? |
PascalABC.NET Обработка событий в редакторе форм
https://www.cyberforum.ru/ pascalabc-net/ thread1955891.html Есть процедура в public класса Form1 формы Form1: procedure whatwaspressed(sender: Object; e: KeyEventArgs); Ее вызов при загрузке: implementation var a : integer :=1; procedure Form1.Form1_Load(sender: Object; e: EventArgs); begin |
PascalABC.NET Странность с массивами Скажите, почему при выполнении этого кода: var a,b:array of integer; begin for var i:=0 to 10 do a:=10-i; for var i:=0 to 10 do a:=a+a; writeln(a); end. Получается, что a,a,...a = 10, но a=14, a=13, a=12, a=11, a=10. Почему a...a не равны 10? |
PascalABC.NET Stack. Умножение многочленов
https://www.cyberforum.ru/ pascalabc-net/ thread1955205.html Задача. Написать программу умножения двух многочленов. Многочлены представлены в виде стека. Программу я саму написал, но есть одно но, она не работает, если есть хотя бы одно отрицательное число Не могу понять, как доработать процедуру умножения, для правильной работоспособности Помогите, пожалуйста uses crt; type Ptr = ^Stack1; |
21 / 68 / 18
Регистрация: 12.04.2017
Сообщений: 260
|
|
15.04.2017, 12:05 | 0 |
Обработка изображения через матрицу путем аффинных преобразований - PascalABC.NET - Ответ 1033338915.04.2017, 12:05. Показов 1798. Ответов 12
Метки (Все метки)
Ответ
Похоже, ТС хочет, чтобы в программе не было объявления uses GraphABC...
Вернуться к обсуждению: Обработка изображения через матрицу путем аффинных преобразований PascalABC.NET
0
|
15.04.2017, 12:05 | |
Готовые ответы и решения:
12
Реализация двумерных аффинных преобразований Путем элементарных преобразований привести матрицу к треугольному виду Путем линейных преобразований строк привести исходную матрицу к треугольному виду. СДНФ путем преобразований |
15.04.2017, 12:05 | |
15.04.2017, 12:05 | |
Помогаю со студенческими работами здесь
0
СКНФ путём равносильных преобразований СДНФ путём эквивалентных преобразований Проверьте тождество путем преобразований СКНФ и СДНФ путем тождественных преобразований |