Лаба по турбопаскале, завтра зачёт

[HAMA]

Завтра зачёт, препод задал, а я не могу её сделать
Звіт з лабораторної роботи готується у вигляді трьох файлів:

файл програмного коду (файл з розширенням .pas - інтегроване середовище розробки Турбо Паскаль 7.0);
файл, що виконується (файл з розширенням .exe - інтегроване середовище розробки Турбо Паскаль 7.0);
файл з тестовим прикладом та таблицею трасування (файл з розширенням .txt або .doc - текстові редактори MS Word, EditPlus, EmEditor або інші).
Усі створені файли відправляються на сайт у вигляді одного архівного файлу. Останній створюється програмою-архіватором (WinZip, WinRar) і повинен мати розширення .zip або .rar.
Ідентифікатори файлів створюються за допомогою латинських літер.

Для розрахунку значення змінної с = f(x, y) відповідно до математичних виразів

где

була розроблена наступна програма на алгоритмічній мові Pascal:
program labwork01;
uses crt;
const p=-51;
q=5;
m='Otvet: ';
var x,y:integer;
a,b,c:real;
begin
clrscr;
write('Vvedite x = ');
readln(x);
write('Vvedite y = ');
readln( y );
a:=cos(x);
b:=abs( y );
if x>=y then c:=a*b+p
else c:=(a-q)/b;
writeln;
writeln('-------------------');
writeln('a = ',a);
writeln('b = ',b);
writeln('-------------------');
writeln;
write(m);
writeln('c = ',c:4:4);
readln
end.
Відтворіть програму у інтегрованому середовищі розробки Turbo Pascal 7.0, виконайте налагодження програми та ії трасування. Зверніть увагу на відповідність тексту програми математичному опису завдання.

При трасуванні програми визначте: які змінні використовуються у програмі; як міняються їх значення в процесі роботи програми. Трасування виконайте для двох пар значень x та y (x>y та x).

[Mad_Cat]

HAMA Сегодня задал? 20 минут назад? Че задал то?

[HAMA]

Для розрахунку значення змінної с = f(x, y) відповідно до математичних виразів

[HAMA]

де................................. ...

[Arigato]

А чего вы темы-то плодите: http://programmersforum.ru/showthread.php?p=944458
И не пишите 2 сообщения подряд, есть кнопка "Правка".