Scrieţi o funcţie PASCAL cu numele AP, care returnează valoarea TRUE dacă trei numere întregi
date a, b, c pot forma mărimile unghiurilor (în grade) ale unui trinunghi dreptunghic şi FALSE - în
caz contrar. Valorile a, b, c vor fi transmise funcţiei în calitate de parametri.
var a,b:integer;c,c1:real; procedure AP(); begin; readln(a,b,c1); c:=sqrt(a*a+b*b); if c1=c then writeln('True') else writeln('False'); end;Begin AP;end.
Vă mulțumim că ați vizitat platforma noastră dedicată Informatică. Sperăm că informațiile oferite v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Așteptăm cu nerăbdare să vă revedem și nu uitați să ne salvați în lista de favorite!
