Weblivre.net - Informação em Primeiro Lugar

Assine nosso RSS
Publicado em 14/05/2005 - 10 comentários - Ler artigos relacionados - Você está em: Colunas » Pascal

Desenvolvendo o primeiro programa em Pascal

Hoje estaremos desenvolvendo nosso primeiro sistema em Pascal.

Vamos fazer nosso primeiro programa em Pascal.

Função do programa:
Recolher 3 notas, nome e o numero de um aluno e mostrar a média do aluno.


A estrutura básica do Pascal é:

program NOME_DO_PROGRAMA;
{Declarações de variaveis, constantes}
begin
{Corpo do programa}
end.

Algumas caracteristicas básicas do Pascal:
- Toda linha de comando termina com ";"
- O Pascal não permite conexão com banco de dados
- Cada variável deve ser antes de usada declarada.

Nosso programa ficaria assim:

Program Exemplo1;
{Declarando as variaveis}
var nota1, nota2, nota3, media : real;
numero : integer;
nome : string;

Begin
{Iniciando o programa, irá pegar os dados}
write('Nome do aluno: ');
readln(nome);
write('Número do aluno: ');
read(numero);
write('Primeira nota do aluno: ');
read(nota1);
write('Segunda nota do aluno: ');
read(nota2);
write('Terceira nota do aluno: ');
read(nota3);
alcula a média}
media := (nota1+nota2+nota3)/3;
{Imprimi a média na tela}
write(media);
End.

write = escreve um texto na tela.
read = grava o que foi digitado na variável.
O que estiver entre chaves {Exemplo} é a maneira de comentar o código em Pascal, não irá ser mostrado ao usuário e não irá interferir no código.

Por hoje é só pessoal.
Até a próxima.

Autor: Filipe - WebLivre

Compartilhe:

Comentários

Comente este artigo!

Patrick em 22/09/2008
Gostaria de saber ........ Estou fazendo todas as regras certinho mais dai na hora do programa mostrar a nota ele não mostra e sai desde jah fico grato!

piroco em 02/07/2008
Gostei muitcho sô que tem um erro neste algoritmo, mas tá bão mio que nada, pois eu num tive qui pagá nada, mermo. valeu abraços

eduardo em 16/06/2008
Quero estudar?

—ƒranklyn em 10/06/2008
Oi, gente. Encontrei um pequeno erro nese algorítmo: ali no final "media := (nota1+nota2+nota3)/3;"... Tem que ser assim: "((media := (nota1+nota2+nota3)/3);"

dayana em 26/04/2008
gostaria de aprender a desenvolver um programa em pascal,passo a passo.O programa que eu gostaria e de um supermecado.

Jose Rodolfo em 03/03/2008
preciso criar um algoritmo para apresentar todos os valores númericos inteiros ímpares situados na faixa de 0 a 20.

Juarez Jr_SIN-Per.6 em 11/10/2007
Ótimo, parabéns felipe o artigo é bom mesmo, simples, mas instrutivo!

Hudson em 02/10/2007
Ok. Mas existe bug nesse codigo. Então vejam bem onde esta o erro. Abraços

plinio em 26/06/2006
Gostei do site, e parabenizo-o pela iniciativa, pois está despertando em leigos como eu, o gosto pela programação.

Rodrigo em 02/08/2005
Gostei muito do site de vc!!! utilizo bastante. continue assim.valeu!!!

2004-2008 Weblivre.net Todos os direitos reservados.

Quem somos | Política de Acesso | Anuncie | Na Mídia | Seja um Colunista | Sugestão de Pauta | Fale Conosco

Idealização: Webla - Comunicação Digital