Estou começando agora em pascal, estou meio perdida nesse algoritmo alguém poderia me ajudar a resolver?
Faça um programa que leia o nome e o salário bruto de um professor. Sabendo que o imposto a ser descontado
é de 3% sobre o salário bruto e que ele recebe uma bolsa família de R$120,00; calcule o salário líquido. O
algoritmo deve escrever o nome do professor, o salário bruto, o valor do desconto e o salário líquido.
Program salario_do_Professor;
uses wincrt;
const
bolfamil=120; {Define o valor da bolsa família,definimos como uma constante para possíveis alterações em ter que mudar o programa todo}
var sal_brut,sal_liq,imp:real; {Observação,o nome é uma string}
{Tendo:}
nome:string;
{Obs:Uma idéia seria criar a função Desconto,mas esse é meu primeiro post,e eu quero entender como funciona esse site,rapaz pressupondo que você não errou contas,tá feito,ahh não faltou dizer o nome do professor,então coloque writeln(nome;,em algum lugar,bom isso é apenas um teeste}
Begin
clrscr;
writeln ('Digite o nome do Professor');
readln (nome);
writeln ('Digite o salário Bruto');
readln (sal_brut);
imp:=(0.03*sal_brut);
sal_liq:=sal_brut-imp+120;
writeln ('O desconto de seu salário é de: ',imp:2:2);
writeln ('Você receberá a quantia Liquido de R$: ',sal_liq:2:2);
readkey;
End.
{Ah não meu,como envia isso?xD}{ahhh achei lol}
Eu nem sei o que eu fiz acima solução:
Program salario_do_Professor;
uses wincrt;
const
bolfamil=120; {Define o valor da bolsa família,definimos como uma constante para possíveis alterações em ter que mudar o programa todo}
var sal_brut,sal_liq,imp:real; {Observação,o nome é uma string}
{Tendo:}
nome:string;
{Obs:Uma idéia seria criar a função Desconto,mas esse é meu primeiro post,e eu quero entender como funciona esse site,rapaz pressupondo que você não errou contas,tá feito,ahh não faltou dizer o nome do professor,então coloque writeln(nome;,em algum lugar,bom isso é apenas um teeste}
Begin
clrscr;
writeln ('Digite o nome do Professor');
readln (nome);
writeln ('Digite o salário Bruto');
readln (sal_brut);
imp:=(0.03*sal_brut);
sal_liq:=sal_brut-imp+120;
writeln('Professor: ',nome);
writeln ('O desconto de seu salário é de: ',imp:2:2);
writeln ('Você receberá a quantia Liquido de R$: ',sal_liq:2:2);
readkey;
End.
{Ah não meu,como envia isso?xD}{ahhh achei lol}Eu nem sei o que eu fiz,nesse site é a primeira vez que mecho nesse troço,se tiver correto me avisa por favor.Só não sei como avisa,ahhh.xD
Edição feita por: DarkSign, 29/03/2010, 10:41.
[code] para códigos
