Keresés Kategóriák Kedvencek

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.

    program pit001;

    uses crt;

    var a,b,c,d:word;

    begin
    Clrscr;
    Writeln("A kocka elhossza?");
    Readln(a);
    b:=Sqr(a)*2;
    Write('A kocka lapatloja: ');
    Writeln(b);
    c:=Sqrt(b);
    d:=Sqr(a)+Sqr(c);
    Write('A kocka testatloja: ');
    Writeln(d);
    Readln;
  • Címkék:

    pascal pitagorasz
aronvad - 14 éve, 12 hónapja

hát azt barátom elprogramoztad
legalul kiírja a hibaüzenetet, ha azt meg tudod mondani akkor talán könnyebben segítek

kecske - 14 éve, 12 hónapja

szia
az szeretném kérdezni hogy az mitől lehet hogy bármilyen programozást csinálok pascal-ban az sosem jó midig kiirja hogy faiiled
ha valaki tudja hogy ez miért van az lécci irja má meg kommentbe!!

előre is köszi:
Balázs

aronvad - 14 éve, 12 hónapja

kössz!
a hang amiatt van hoy gépelésközbe néha elhajolok a mikrofontól.

Csontos - 14 éve, 12 hónapja

Jó videó lett! 5*
Jól beindul-t a pascalozas a honlapon:P
Nem tudom miért de néha elmegy a hangod nézz utána hátha máskor jó lesz am nagyon jó vidi