calculo de vendas
Publicado por NewLinuxer 13/12/2005
[ Hits: 4.342 ]
nao tem um fim muito pratico, porém é um bom exemplo pra estudo, nele são armezenados em dois vetores o valor da peça vendida por cada um e a quantidade, no fim é mostrado quanto cada um vendeu, e quantas peças foram vendidas no total.
Program exercicio13; uses crt; Var pecas : array[1..10] of integer; valor : array[1..10] of real; contador,soma: integer; Begin clrscr; For contador := 1 To 10 do begin write('Informe a quantidade de pecas do vendedor ',contador:2,': '); readln(pecas[contador]); write('Informe o valor da peca do vendedor ',contador:2,': '); readln (valor[contador]); writeln end; soma:=0; clrscr; For contador := 1 to 10 do soma:= soma+pecas[contador]; writeln('O total de pecas vendidas por todos vendedores juntos foi: ',soma); writeln; For contador := 1 to 10 do writeln('O total das vendas do vendedor ',contador:2,' foi: R$ ',pecas[contador]* valor[contador]:0:2); Readkey; end.
Contador de números (Pascal) - efeito Matrix
programa para selecionar os números em posições impares em array de 19 espaços e calcular a media
armazenar o nome de um aluno e suas notas
Nenhum coment�rio foi encontrado.
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Realizar overclock no Miyoo Mini (plus ou normal)
Otimização de memória para máquinas modestas
linux mint reconhece microfone de lapela como fone de ouvido sem micro... (0)
Dúvidas sobre a originalidade de conteúdos online (10)
Erro de interface de Rede no Virt Manager dentro Debian 13 KDE (12)
Monitoramento pfsense com zabbix (3)
Google Crhome não abre desde que eu atualizei pelo "program... (13)