|
|
| Другие темы раздела | |
| Free Pascal Принадлежит ли точка лучу ПОмогите решить Входные данные Шесть чисел – координаты точки и координаты начала и конца вектора. Выходные данные Одна строка “YES”, если точка принадлежит лучу, определяемому вектором, и “NO” в противном случае. Примеры входные данные 4 0 4 2 4 5 https://www.cyberforum.ru/ free-pascal/ thread1654000.html |
Free Pascal Не распознаются киррилические символы в файле Сделал программно текст. файл, ввел в него программно кириллические строки. Вывел строки на экран- на экране все ок. При открытии текст. файла блокнотом- в нем неизвестные символы. При тексте латиницей- символы нормальные. Кодировка файла с кодом- CP866. Говорят, несколько способов избежать этого есть. Напишите, пожалуйста. |
| Free Pascal Вычислить сумму ряда Составьте программу, которая находить значение этого выражения: -1+1/2-1/3+1/4- ...+1/n https://www.cyberforum.ru/ free-pascal/ thread1653368.html | Free Pascal Определить, является ли последовательность записью нечётного числа в пятнадцатеричной системе счисления На вход программе подаётся последовательность символов, заканчивающаяся точкой (точка – признак конца и в последовательность не входит). Вывести слово YES, если введённая последовательность является правильной записью нечётного числа в пятнадцатеричной си-стеме счисления, и NO в противном случае. var x:char; a,b,c,d,e:longint; begin write('введем последовательность, заканчивающаяся... https://www.cyberforum.ru/ free-pascal/ thread1651510.html |
|
Free Pascal Вычислить суммы разрядов чисел Массив из 100 элементов заполнен случайными числами от 10 до 99. Вывести на экран суммы разряда едениц и разряда десятков чисел, находящихся в массиве. |
Free Pascal Создать массив из 20 случайных чисел от -50 до 50 и удалить первый отрицательный элемент этого массива Создать массив из 20 случайных чисел от -50 до 50 и удалить первый отрицательный элемент этого массива, затем вывести полученный массив на экран. Если такового не нашлось, то вывести неизмененный массив. (P.s. Начались Многомерные Массивы) Заранее Спасибо! https://www.cyberforum.ru/ free-pascal/ thread1651044.html |
|
Free Pascal Вывести на экран суммы значений
https://www.cyberforum.ru/ free-pascal/ thread1650783.html Дана квадратная матрица со стороной 9 элементов, заполненным случайными натуральными числами от 0 до 9 вывести на экран суммы четных значений нечетных элементов и нечетных значений четных элементов. Элементы считать относительно начала строк. Спасибо большое. |
Free Pascal Написать программу сравнения, сложения и вычитания длинных чисел Помогите решить задачу. Задача: Написать программу сравнения, сложения и вычитания длинных чисел (до 100 десятичных знаков). |
|
Free Pascal Для данного x вычислить значение следующей функции f, принимающей значения целого типа
https://www.cyberforum.ru/ free-pascal/ thread1649931.html 0,если x < 0, f(x)= 1, если x принадлежит function f(a: real):integer; begin if a<0 then f:=0 else if (a>=0)and(a<1)and(a<=2) and (a<3) then f:=1 else if (a>=1)and(a<2)and(a>=3) and (a<4) then f:=-1 end; var x:real; begin |
Free Pascal Создание динамического массива объектов и передача параметров объектов через метод конструктор Здравствуйте, подскажите пожалуйста, как в Free Pascal создать динамический массив объектов и передать значения параметров объекта через метод конструктор? Например, имеется класс: type laptop=object manufacturerName:string; weight:short; end; Как создать динамический массив, например, ноутбуков? И как передать имя производителя и вес ноутбука в параметры объекта... https://www.cyberforum.ru/ free-pascal/ thread1649916.html |
|
Free Pascal Найти сумму членов последовательности найти сумму членов последовательности A\kappa = ({k}^{2} - 3 )/{k}^{3} k=1,...,n , n вводит пользователь |
Free Pascal Алгоритмом Решето Эратосфена найти четвёрки меньших N простых чисел, принадлежащих одному десятку Здравствуйте. Условие задачи в названии темы. Здесь, на форуме, нашлось вот такое решение (автор - volvo) const N = 2000; var a : array of boolean; Test : array of Integer; x, y : integer; Cnt, Decimal : Integer; https://www.cyberforum.ru/ free-pascal/ thread1649260.html |
|
0 / 0 / 0
Регистрация: 01.12.2015
Сообщений: 120
|
||||||
| 0 | ||||||
Вычислить расстояние от точки до луча - Free Pascal - Ответ 870507703.02.2016, 11:51. Показов 5413. Ответов 1
Метки (Все метки)
Входные данные Шесть чисел – координаты точки и координаты начала и конца вектора. Выходные данные Одно число – расстояние от точки до луча, определяемого вектором. Вернуться к обсуждению: Вычислить расстояние от точки до луча Free Pascal
0
|
||||||
| 03.02.2016, 11:51 | |
|
Готовые ответы и решения:
1
|
| 03.02.2016, 11:51 | |
| 03.02.2016, 11:51 | |
|
Помогаю со студенческими работами здесь
0
Вычислить расстояние от отрезка до точки без кучи условий Класс Точка. Вычислить расстояние от точки до начала координат... |