Program: sprawdzający czy z podanych przez użytkownika boków można utworzyć trójkąt.
Po wcześniejszym podaniu trzech boków przez użytkownika. (wykonując w sumie dwie pętle) Program bazuje na warunku tworzenia trójkąta.
Kompilator: Turbo Pascal
Galeria:
Kod programu:
program trojkat;
uses crt;
var
a,b,c:byte;
i:integer;
begin
clrscr;
For i:=1 to 2 do
begin
Write('a= ');
Readln(a);
Write('b= ');
Readln(b);
Write('c= ');
Readln(c);
If (a<b+c) and (b<a+c) and (c<a+b) then writeln('Można zbudowac trójkąt.')
else writeln('Nie można zbudowac trójkąta.');
end;
readln;
end.Słowniczek pojęć:
Aby z trzech odcinków zbudować trójkąt, najdłuższy z nich musi być krótszy niż suma długość dwóch pozostałych.