eworld.uz
13.11.2009, 17:27
привет всем...не могу решит одну задачку (простую) в Турбо Паскале...кто может помогите пож...Дано треугольник...Большой радиус=2.5..Алфа=п/6..бета=п/3... надо найти гамму,периметр,а,б,с, S,r..
program 1;
uses crt;
const R1=2.5, alfa=pi/6; beta=pi/3;
var a,b,c,s,p,gamma,R2:real;
begin clrscr;
gamma:=pi-(alfa+gamma);
{все отсальные параметры тоже нащел}
writeln('gamma=');
end.
чета нехочеть работать...что делать?? где ощибься??
program 1;
uses crt;
const R1=2.5, alfa=pi/6; beta=pi/3;
var a,b,c,s,p,gamma,R2:real;
begin clrscr;
gamma:=pi-(alfa+gamma);
{все отсальные параметры тоже нащел}
writeln('gamma=');
end.
чета нехочеть работать...что делать?? где ощибься??