Postagens

Resumo - A Quinta Disciplina - Conclusão - A Prática do Pensamento Sistêmico

A PRÁTICA DO PENSAMENTO SISTÊMICO O pensamento sistêmico é uma disciplina para ver o todo. É um quadro referencial para ver inter-relacionamentos, ao invés de eventos, para ver os padrões de mudança em vez de “fotos instantâneas”. Hoje, o pensamento sistêmico é mais necessário do que nunca, pois nos tornamos cada vez mais desamparados diante de tanta complexidade. Talvez, pela primeira vez na História, a humanidade tenha a capacidade de criar muito mais informações do que o homem pode absorver, de gerar uma interdependência muito maior do que o homem pode administrar e de acelerar as mudanças com uma velocidade muito maior do que o homem pode acompanhar. A prática do pensamento sistêmico começa com a compreensão de um conceito simples chamado feedback, que mostra como as ações podem se reforçar ou equilibrar umas às outras. No pensamento sistêmico, feedback é um conceito mais amplo. Significa qualquer fluxo recíproco de influência. No pensamento sistêmico há o axioma de que t

Algorítimo Pascal - Arestas do Triângulo

Desenvolva um programa que dadas três variáveis A, B e C, como sendo as arestas de um triângulo determine se: Forma um triângulo (a+b>c e a+c>b e c+b>a); Caso seja um triângulo determinar se este é: Escaleno (A<>B e A<>C e B<>C); Isósceles ((A=B e A<>C) ou (A=C e A<>B) ou (B=C e B<>A)); Equilátero (A=B e B=C).  program RESPOSTA_2; {$APPTYPE CONSOLE} VAR A, B, C: REAL; BEGIN WRITELN('INFORME O VALOR DE A: '); READLN(A); WRITELN('INFORME O VALOR DE B: '); READLN(B); WRITELN('INFORME O VALOR DE C: '); READLN(C); IF (A+B > C) AND (A+C > B) AND (C+B > A) THEN BEGIN WRITELN('A, B E C FORMAM UM TRIANGULO!'); END ELSE IF (A=B) AND (A=C) THEN WRITELN('TRIANGULO EQUILATERO'); IF (A=B) OR (A=C) OR (B=C) THEN WRITELN('TRIANGULO ISOSCELES'); IF (A <> B) AND (A <> C) AND (B <> C) THEN WR