Programozás Pascalban: Téglalap átlójának kiszámítása
Készítette: aronvad
2009. november 24. 16:52:03 - 6853 megtekintés
  • Ebben a tippben egy olyan Pascal program megírását fogom bemutatni, amely a Pitagorasz-tétel segítségével kiszámolja egy téglalap átlóját.

  • Amire szükségünk lesz

    Pascal

  • Téglalap átlójának kiszámítása

    A freepascal.org oldalról töltsük le a programot. Indítsuk új dokumentumot a programot, nevezzük el. Mindig pontosvesszővel zárjuk le a sort. <br /> <br /> program pit001;<br /> <br /> uses crt;<br /> <br /> var a,b,c,d:word;<br /> <br /> begin<br /> Clrscr;<br /> Writeln("A kocka elhossza?");<br /> Readln(a);<br /> b:=Sqr(a)*2;<br /> Write('A kocka lapatloja: ');<br /> Writeln(b);<br /> c:=Sqrt(b);<br /> d:=Sqr(a)+Sqr(c);<br /> Write('A kocka testatloja: ');<br /> Writeln(d);<br /> Readln;<br />

  • Címkék:

    pascal pitagorasz
Kapcsolódó videók Hozzászólások
Cartman01 - 15 éve

Köszi!
Nemrég tanultuk Pitagorasz tételét jóljön majd leckéhez

aronvad - 15 éve

örülök hogy végül sikerült

kecske - 15 éve

köszi mindent de én voltam hülye elírtam vagy 3 dolgot kijavítottam és igy már jó lett

aronvad - 15 éve

ismét mondom: legalul van a hibaüzenet, a progrma alján

kecske - 15 éve

amikor rányomokhogy run akkor kiiirja hogy: compile failed
de lehet hogy félreirtam valamit de ujrairtam vagy 1 szer és ugy sem megy...

Tovább