Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Turbo Pascal...Need help.... (https://forum.antichat.xyz/showthread.php?t=156273)

eworld.uz 13.11.2009 17:27

Turbo Pascal...Need help....
 
привет всем...не могу решит одну задачку (простую) в Турбо Паскале...кто может помогите пож...Дано треугольник...Большой радиус=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.

чета нехочеть работать...что делать?? где ощибься??

Thenno 13.11.2009 20:34

1. program 1; - уже неправильно. Нужно хотя-бы program p1 писать
2. Исправь R1=2.5; alfa=pi/6; beta=pi/3;
3. И самое главное. Наверное, стоит писать так writeln('gamma=', gamma);

eworld.uz 13.11.2009 20:44

да...все понял.....спасибо....)))


Время: 09:34