Znači treba napisati program u kojem upisujemo 3 broja i on računa da li za njih vrijedi Pitagorin uvjet.Program mi izbacuje grešku:"18 / 11 pitago~1.pas
Fatal: Syntax error, THEN expected but := found".Zanima me dali je algoritam za računanje srednjeg broja dobar.Hvala na pomoći.
program Pitagorin_uvjet;
var a,b,c,max,min,sred:integer;
begin
writeln('Upisi 3 broja da provjerimo Pitagorin uvjet');
readln(a,b,c);
max:=a;
if b > max then max:=b;
if c > max then max:=c;
min:=c;
if b < c then min:=b;
if a < b then min:=a;
sred:=b;
if (a > sred) and (a < c) then sred:=a;
if (c > sred) and (c < a) then sred:=c;
if max*max:=((min*min) + (sred*sred)) then
writeln('Ovi brojevi zadovojlavaju Pitagorin uvjet')
else writeln('Ovi brojevi ne zadovoljavaju uvjet');
readln;
end.