Używamy technologii takich jak pliki cookie do przechowywania i/lub uzyskiwania dostępu do informacji o urządzeniu. Robimy to, aby poprawić jakość przeglądania i wyświetlać spersonalizowane reklamy. Zgoda na te technologie pozwoli nam przetwarzać dane, takie jak zachowanie podczas przeglądania lub unikalne identyfikatory na tej stronie. Brak zgody lub wycofanie zgody może negatywnie wpłynąć na niektóre cechy i funkcje. Informujemy, że istnieje możliwość określenia przez użytkownika serwisu warunków przechowywania lub uzyskiwania dostępu do informacji zawartych w plikach cookies za pomocą ustawień przeglądarki lub konfiguracji usługi. Szczegółowe informacje na ten temat dostępne są u producenta przeglądarki, u dostawcy usługi dostępu do Internetu oraz w Polityce prywatności plików cookies

 Szczegóły znajdziesz w Regulaminie.

Program w Free Pascalu. Napisać program obliczający powierzchnię...

Autor: szczur103, 2012-02-21 18:12:09
Dodaj do:
Program w Free Pascalu.
Napisać program obliczający powierzchnię o obwód trórkąta o bokach a,b,c i wysokości h (wszystkie wymiary mają być typu całkowitego). Dla wartości tych liczb przyjąć format o polu 6-znakowym.
Przyjąć następoujące oznaczenia:
P - pole powierzchni trójkąta (typ rzeczywisty, format 8-znakowy z 3 miejscami po przecinku),
O - obwód trójkąta (typ całkowity, format 8-znakowy).
Program ma tytuł "Trojkat".

Rozwiązania (1)

Autor: Xanathar
3
dodano: 2014-11-01 21:38:33
Program fsdsdf;
uses crt;
var a,b,c,h,P,O:integer;
begin
Clrscr;
Writeln('Podaj a,b,c,h');
readln(a,b,c,h);
P:=a*h/2;
O:=a+b+c;
Writeln('Pole tego trojkata wynosi',P,'a obwód ',O);
repeat until keypressed;
end.
Dodaj rozwiązanie

Podobne zadania

  • Podstawowa
  • Gimnazjum
  • Liceum
  • Studia
AEGEE - Logo
...