НУЖНА ЛАБА ПО ПАСКАЛЮ СРОЧНЯК

Короче у кого есть лаба по паскалю номер два варианта 10...если у кого есть.....буду благодарен......

П.с умным людям и ботаная просьба не пи*деть, что типа зачем поступал и т.д., я ентого дерьма уже начитался в прошлых сообщениях.

__________________
Turn up the bass pump it up!

RE: НУЖНА ЛАБА ПО ПАСКАЛЮ СРОЧНЯК

цитата:

dj_tosha пишет П.с умным людям и ботаная просьба не пи*деть, что типа зачем поступал и т.д., я ентого дерьма уже начитался в прошлых сообщениях.

Как завешал товарищ Ленин(или Сталин)

__________________
Жить в эпоху свершений, имея возвышенный нрав,
к сожалению, трудно.

Сообщение отредактировано 1 раз(а), редактировал lewww , 02.10.2004 в 13:41.

RE: НУЖНА ЛАБА ПО ПАСКАЛЮ СРОЧНЯК

цитата:

lewww пишет цитата: dj_tosha пишет П.с умным людям и ботаная просьба не пи*деть, что типа зачем поступал и т.д., я ентого дерьма уже начитался в прошлых сообщениях. Как завешал товарищ Ленин(или Сталин)

да я уже понял что он всякую хрень завещал...

__________________
Turn up the bass pump it up!

наверное было что-то верное..........maybe only maybe

__________________
Жить в эпоху свершений, имея возвышенный нрав,
к сожалению, трудно.

ты б задание то написал хоть, а то номера ни о чем не говорят

__________________
Allah Akbar!

Обратись в группу 2675 к Алексею
очень толковый парень!
если не очень запарная сделает быстро!
100 % гарантии не даю но советую подойти

лабараторная работа номер 3....Организация циклов задание 3 из ентой лабы

__________________
Turn up the bass pump it up!

program laba3;
uses crt;
var eps, x, xN, xK, dx, S, R, VN, VN1: real;
n: integer;
Begin
writeln('xN, xK, dx, eps');
readln(xN, xK, dx, eps);
x:=xN;
while x<=xK do
begin
R:=exp(-x);
VN1:=1;
n:=0;
S:=1+VN;
repeat
VN:=VN1;
VN1:=VN*(-x)/(n+1);
S:=S+VN1;
n:=n+1;
until abs(VN1)<eps;
writeln(x:5:1,' ',S:9:4,' ',R:9:4,' ',n+1:5,' ');
x:=x+dx;
end;
readln;
End.


вот то, что с прошлого года осталось. может быть поможет

__________________
Allah Akbar!

Сообщение отредактировано 1 раз(а), редактировал Ужах Аль-Кудс , 03.10.2004 в 14:28.

Проще, чем на асме, но гораздо противнее, чем на С++

__________________

Последний рассвет
Тонкая нить и
Холодная сталь
Поможет забыть мне
Сотрёт глубину
Исчезнет печаль
Прольётся внутри
Моя мёртвая кровь
Развеет твой крик