517076776

SearcJi Kun uompiie Dębu

ZfiD4.PflS:2

>graro poleli ss crt;

» bok_a,bok_Jb,bok_c,p„pole :real; fin

•ser;

writeln<'Program obliczający pole trojkata');

write<^łPodaj bok_a: ' );

readln<bok_a>;

write<'Podaj bok_b: ');

readln<bok_b);

write<^łPodaj bok_c: ');

readln<bok_c>;

if <<bok_a>0)and<bok_b>0)and<bok_c>0)) then if <<<bok_a+bok_b)>bok_c)and<<bok_a+bok_c))bok_ begin

p: =<bok_a+bok_b+bok_c>/'2;

pole:=sqrt <p*<p-bok_a)*<p-bok_b)*<p-bok_c > > ;

writeln<'pole:    pole:0:2);

end

zle wartości') zle wartości');

else writeln<'wprowadziłeś else writeln<' wprowadziłeś

-d - -d A _

Comuile F9 Make fi

30-11-08----

Help F2 Saue F3 Ópen fllt+F9

—