Program Ariedreptunghi; var a, b, arie: real; Begin Writeln('Lungimea este egala cu: '); readln(a); Writeln('Latimea este egala cu: '); readln(b); arie:=a*b; Writeln('Aria este egala cu: ', arie); End.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile și inspiraționale. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, suntem aici pentru a vă ajuta. Ne face plăcere să vă revedem și vă invităm să adăugați site-ul nostru la favorite pentru acces rapid!