Код:
program HelloWorld;
var
a, b, c : Real;
begin
writeln('Nachalo na programata');
writeln();
writeln();
writeln('Vuvedete stranite na triugulnika');
writeln();
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
writeln();
writeln();
writeln('sina = ', a/c:8:6);
writeln('cosa = ', b/c:8:6);
writeln('tga = ', a/b:8:6);
writeln('cotga = ', b/a:8:6);
writeln();
writeln('Vuvedete klavish i enter, za da izlezete ot programata');
readln(c);
end.
Блок схемата ти я оставям, то са само квадратчета: Начало->Въвеждане на страните а,b,c->Пресмятане и извеждане на sina,cosa,tga,cotga->Край
Нещо такова, еба ли го.