Borland Pascal 7.0

[Cronus]

Повідомлення від ShaDoWWW

Народ помогите!!! Плиз... Оч. надо!!! Сказали до завтра сделать на паскале ЭТО... Помогите, кто как может... не знаю что делать!
1. Надо создать прогу
Три точки на площади координат ( A (x;y) B(x;y) C(x;y) ). отпределить лежат ли они на одной прямой.

2. Прога
Що за натуральним N знаходить кількість дальників його фактрайла (или как то так, вообщем что б при вводе "5" прога отвечала "1-2-3-4-5"(всемто - знак умножения))


не знаю что делать... помгите плиз...

1. Создаешь уравнения прямой АВ и прямой ВС (где А, В, С - твои точки) в виде y=kx+b. Проверяешь, если k1=k2 и b1=b2 => точки лежат на одной прямой.
Формула уравнения прямой за двумя точками:
(x-x1)/(x2-x1)=(y-y1)/(y2-y1), где А=(x1, y1), B=(x2, y2). Покрути на листике, привиди к виду y=kx+b, получи формулы для k и b. Дальше - см. выше.
2. Вообще-то речь идет о факториале (обозн. N!, N!=1*2*3*...*N).
Делаешь всего лишь проверку в цикле:
for i:=1 to N do
if N_fact mod i = 0 then dilnik:=dilnik+1;

где N_fact - это факториал данного числа, dilnik - кол-во делителей (ответ задачи). Надеюсь, процедуру для поиска факториала напишешь сам.