Код:
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->Край

Нещо такова, еба ли го.