PDA

Просмотр полной версии : Турбо Паскаль! Помогите!


Тарифы: МТС, Билайн, МегаФон
Выгодные непубличные тарифы МТС, Билайн, МегаФон, Безлимитный интернет ✅
vitaminko
20-11-2009, 14:23
Очень надо написать программу на Lazaruse!!!!
Вообщем задача такая, внести координаты 3 точек найти точку наименее удаленную от начала координат

spux
20-11-2009, 14:28
НА паскале или на Лазарусе?

Shurik20
20-11-2009, 14:29
не пупсии я так не умею((

Kolos
20-11-2009, 14:30
и в чем проблема? в школе математику не учили?

vitaminko
20-11-2009, 14:32
на лазарусе

Tims
20-11-2009, 14:33
про фото уже спрашивали?

vitaminko
20-11-2009, 14:33
да двоешница блэ тупайааааа :rolleyes: :mad:

vitaminko
20-11-2009, 14:35
Ехх, Ваня(((

spux
20-11-2009, 14:36
А чем паскаль и лазарус отличается?

Если на паскале то

var
x1,x2,x3,y1,y2,y3,x,y : integer;
s1,s2,s3 : real;
begin
x:=320;
y:=240;

readln(x1);
readln(y1);
readln(x2);
readln(y2);
readln(x3);
readln(y3);

s1 := sqrt(sqr(x1-x) + sqr(y1-y));
s2 := sqrt(sqr(x2-x) + sqr(y2-y));
s3 := sqrt(sqr(x3-x) + sqr(y3-y));

if ((s1>s2) and (s1>s3)) then writeln('max point 1');
if ((s2>s1) and (s2>s3)) then writeln('max point 2');
if ((s3>s2) and (s3>s1)) then writeln('max point 3');
end;


Вроде так, не компилил и не проверял)

vitaminko
20-11-2009, 14:41
ага все поняла как )))) спасибо !!!

vitaminko
20-11-2009, 14:48
прост по разному пишутся программы

linar_ka
20-11-2009, 15:23
кто у вас?:rolleyes:
я ваще в нете сижу на информатике, там 2 рабочих стола в линуксе, на одном включаю лазарус, на другом мозила :D когда подходит ко мне, я типа пишу прогу :cool:

vitaminko
20-11-2009, 15:30
флорид файзиевич, ну такой лысый на половину:mad:

vitaminko
20-11-2009, 15:31
все, пара закончилась УРАаааааааааааааааа!!!

Shurik20
20-11-2009, 15:34
хорош флудить:D
пс бле я в аську зайти не могу:mad:

vitaminko
21-11-2009, 13:36
ск:mad: меня тоже бесит эта связь, старую мтс симку наверн скоро достану, Ё - гамно:mad:

Shurik20
22-11-2009, 20:39
номер только мне не забудь дать:)

HotBird
08-01-2011, 08:57
Нужно сейчас решить задачку на паскале(информатика 1 курс) кто сможет помочь? заплачу

OsminogPauli
13-01-2011, 14:43
давай

Hursh
13-01-2011, 14:49
http://deseptikon.ru/uploads/posts/2...49c751f11e.jpg

royk
20-01-2011, 17:07
когда-то писал программы на паскале 7.0..
пару расчётных программ есть - за них мне экзамены в школе засчитали..
ну и традиционно тетрис.. но я его не долелал..