Logica De Programação - Equação De 1º Grau

Início

Real: A, B, C, DEL, X1, X2;

Escreva(“Equação do Segundo Grau ”);

Escreva(“Digite um valor para A ”);

Leia(A);

Escreva(“Digite um valor para B ”);

Leia(B);

Escreva(“Digite um valor para C ”);

Leia(C);

DEL←B**2-(4*A*C);

Se (DEL>=0) então

X1←(-B+DEL//2)/2*A;

X2←(-B-DEL//2)/2*A;

Escreva(“O valor de X1 é ”, X1 , “ e o valor de X2 é ”, X2);

Senão

Escreva(“Não é possível encontrar valor de X1 nem o valor de X2 ”);

Fim_se;

Fim.

Início

Real: ALT, PI;

Caracter: SEXO;

Escreva(“Digite a sua altura ”);

Leia(ALT);

Escreva(“Digite o seu sexo. M - para masculino ou F - para feminino”);

Leia(SEXO);

Se (SEXO=’M’) então

PI←(72.7*ALT)-58;

Escreva(“Seu peso ideal é ”, PI);

Senão

PI←(62.1*ALT)-44.7;

Escreva(“Seu peso ideal é ”, PI);

Fim_se;

Fim.

Início

Real: KG, MULTA;

Escreva(“Digite quantos quilos de peixe você pescou. ”);

Leia(KG);

Se (KG>50) então

MULTA←(KG-50)*4;

Escreva(“Você ultrapassou a quantidade de peixe. ”);

Escreva(“Pagará uma multa de R$ ”, MULTA);

Senão

Escreva(“Você não ultrapassou a quantidade de 50 kg de peixe. ”);

Fim_se;

Fim.