Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.12.2011, 11:26   #1
buslik
 
Регистрация: 17.04.2011
Сообщений: 4
По умолчанию pascal

Составить модуль для работы с точками и векторами плоскости. Организовать вектор как пару вещественных чисел и разместить в строковой переменной. Точку отождествить с радиус-вектором.

program z2;
uses crt, vector;

Короче в последней строчке ошибка file not found (vector.tpu).

Вообще не понимаю к чему это, в целом прога такова

PHP код:
program z2;
uses crtvector;
var
ab:string;
ig:integer;
begin
clrscr
;
writeln('‚ўҐ¤ЁвҐ Є®®а¤Ё**вл ЇҐаў®Ј® ўҐЄв®а* зҐаҐ§ Їа®ЎҐ«');
readln(a);
writeln('‚ўҐ¤ЁвҐ Є®®а¤Ё**вл ўв®а®Ј® ўҐЄв®а* зҐаҐ§ Їа®ЎҐ«');
readln(b);
writeln('‚ўҐ¤ЁвҐ зЁб«®');
readln(g);
writeln('“Є*¦ЁвҐ *®¬Ґа ®ЇҐа*жЁЁ: 1-б«®¦Ґ*ЁҐ;');
writeln('2-а*§*®бвм;');
writeln('3-Їа®Ё§ўҐ¤Ґ*ЁҐ ўҐЄв®а* ** зЁб«®;');
writeln('4-¬®¤г«Ё ўҐЄвoа®ў;');
writeln('5-бЄ*«па*®Ґ Їа®Ё§ўҐ¤Ґ*ЁҐ ўҐЄв®а®ў;');
readln(i);
case 
i of
1
:writeln(sum(a,b));
2:writeln(raz(ab));
3:writeln(prz(a,g),' ',prz(b,g));
4:writeln(mdl(a),' ',mdl(b));
5:writeln(spr(a,b));
end;
writeln('„«п §*ўҐаиҐ*Ёп **¦¬ЁвҐ Enter');
readln;
end
buslik вне форума Ответить с цитированием
Старый 21.12.2011, 11:30   #2
danekne
Форумчанин
 
Регистрация: 12.02.2007
Сообщений: 360
По умолчанию

uses crt, vector Проверь, правильно ли пути к tpu файлам прописаны
danekne вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Неудобство ABC Pascal и глюк Borland Pascal proser93 Помощь студентам 0 19.11.2011 19:01
Turbo Pascal и Free Pascal , в чем разница? antoxann Паскаль, Turbo Pascal, PascalABC.NET 31 09.11.2011 07:52
а free pascal не читает задачи которые написаны на turbo pascal? demonara Паскаль, Turbo Pascal, PascalABC.NET 3 25.05.2009 16:28
Перевод кода из Pascal в Object Pascal zemskov77 Общие вопросы Delphi 1 03.01.2009 09:37