Oblicz pole i obwód trójkąta równobocznego

Bartosz

Bartosz Stefanicki Poniedziałek, 22.04.2024

Oblicz pole i obwód trójkąta równobocznego

Dana jest długość boku trójkąta równobocznego. Napisz program w Pascalu, który wyznaczy jego pole powierzchni i obwód.

  • clrscr - wymaga załadowania biblioteki crt,
  • sqrt - pierwiastek kwadratowy,
  • s:4:2 - ograniczenie wyniku do 4 znaków, 2 po przecinku,
begin //rozp. bloku
clrscr; //oczyszczenie ekranu

writeln('Podaj długość boku: '); //wyśw. zapytania
readln(a); //wczytanie wartości zmiennej

h:=(a*sqrt(3))/2; //obliczenie wys.
s:=a*h/2; //obliczenie pola powierzchni
o:=3*a; //obliczenie obwodu

writeln('Pole powierzchni wynosi: ',s:4:2); //wyśw. pola powierzchni
writeln('Obwód wynosi: ',o); //wyśw. obwodu

end.

Warto zobaczyć

Szukasz hostingu?

Jest dużo firm oferujących hosting, ale którą wybrać? Przedstawiamy zestawienie najciekawszych propozycji i ranking hostingów (Maj 2024).

Data publikacji: Poniedziałek, 15.11.2010. Tagi: pascal, skrypty. Źródło obrazka Pixabay, Font awesome.

4 komentarzy


© 2005-2024 itporady.pl. Wszystkie prawa zastrzeżone.

Strona korzysta z plików cookies w celu realizacji usług i zgodnie z Polityką prywatności. Możesz określić warunki przechowywania lub dostępu do plików cookies w Twojej przeglądarce.