Długości ramki mają mieć długość wybraną przez użytkownika.
Niestety nie było mnie na lekcjach związanych z pętlami.
Na razie mój kod wygląda tak:
USES CRT;
VAR
x,y,BYTE;
begin
clrscr;
write('Podaj dlugosc pierwszego boku ');
readln(x);
write('Podaj dlugosc drugiego boku ');
readln(y);
(Tu powinny być pętle)
readkey;
end.