Programa pascal

1105 palavras 5 páginas
Exibir mais
| | |
| |Instituo de Engenharia e Tecnologia -IET |
|Centro Universitário de Belo Horizonte |Curso de Ciência da Computação |
|Disciplina: Algoritmo e Estruturas de Dados |Tipo de avaliação: DAD – TP II |
| |Belo Horizonte, 25/ 10/ 2012 |
|Professor: Miriam Lourenço Maia | |
| |
|Aluno: _____________________________________________________________________________ |
|No de matrícula: ______________ |Turma: CIC1AN-A |Valor: 10 pontos |Nota: |

| |
|O trabalho é em grupo de, no máximo, 4 alunos; |
|Trabalhos copiados não serão considerados (nota zero para todas as cópias); |
|Devem ser entregues a listagem impressa dos programas, com as devidas indentações e bem documentada,

Relacionados

  • programa pascal
    393 palavras | 2 páginas

    Program atividade1 ; Uses CRT; var sal,salx,sal2:real; vale,sexo,nome,depart, fun,sangue,vale1,vale2,sexo1,sexo2:string; vale3,salario_extra: char; cod,ndep: integer; Begin sexo1:='feminino'; sexo2:='masculino'; vale1:='recebe'; vale2:='não recebe'; writeln('Qual o seu CODIGO ?'); readln(cod); Writeln('Qual o seu NOME ?'); readln(nome); writeln('Qual o seu Sexo [F/M]'); readln(sexo); if sexo =('f')….

    exibir mais
  • Programa pascal
    353 palavras | 2 páginas

    program media_notas; var NOME:string; N1,N2,N3,MEDIA:real; CONT:integer; begin clrscr; FOR CONT:=1 to 10 do begin write('Digite o nome e as 3 notas do ',cont,'o aluno '); readln(NOME,N1,N2,N3); while (N110) or (N210) or (N310) do begin {repete enquanto as notas forem menores que 0 ou maiores que 10!} writeln('Notas inválidas! Digite notas de 0 a 10!'); readln(N1,N2,N3); end; MEDIA:=(N1+N2+N3)/3; writeln('A….

    exibir mais
  • Exercicios programa pascal
    3638 palavras | 15 páginas

    Programas em Pascal Resolução – Lista 01 01. Faça um algoritmo que leia os valores A, B, C e diga se a soma de A + B é menor que C. program valores; var a, b, c, soma:real; begin writeln('Digite o valor para a:'); readln(a); writeln('Digite o valor para b:'); readln(b); writeln('Digite o valor para c:'); readln(c); soma:=a+b; if soma=ap then begin writeln('Nome do aluno:',nome); readln; writeln('A media do aluno eh:',media:5:2,'APROVADO' ); readln;….

    exibir mais
  • Projecto de Programas em Pascal
    751 palavras | 4 páginas

    PARTE I Exercícios da Ficha 1. Programa para calcular um factorial Program factorial ; var fact, a, num: integer; Begin writeln('introduza o valor'); read(num); fact:=1; for a:=1 to num do begin fact:=fact*a; end; write('O Valor de ', num, ' Factorial é: ', fact); End. 2. Programa para verificar se um numero é ou não Armstrong. Program Amstrong; var n,a,b,c,result:integer; Begin writeln('digite o valor'); read(n);….

    exibir mais
  • Programa Pascal Salvo Automaticamente
    462 palavras | 2 páginas

    3)Escreva um programa em Pascal para ler um número positivo qualquer, calcular e escrever o quadrado e a raiz quadrada do mesmo. program ex2; uses crt; var x, q: integer; r: real; begin clrscr; write('Informe um numero: '); readln(x); q:= sqr(x); writeln('O quadrado de ', x, ' ‚ ', q); if x>=0 then begin r:= sqrt(x); writeln('A raiz quadrada de ', x, ' ‚ ', r:0:2); end else begin writeln('Nao existe raiz de ',x); end; readkey; end. 8) antes do raciocionamento de energia ser decretado….

    exibir mais
  • Programa em pascal com código de produtos com case
    380 palavras | 2 páginas

    ...Programa em pascal para calcular e mostrar o estoque com código de produtos e código de país com CASE.. {*Função do programa: Calcular e mostrar Nome do Programa: Controle de estoque Supermercado Nome do programador: Anderson de Oliveira versão: 1.0 Data: 29/03/2012 *} Program calc_mostrar; Uses wincrt; {Declaração de Variáveis} Var codigo_produto,codigo_pais:integer; peso_grama,pesokg,imposto,preco_total,valor_total,preco_grama:real; {Início do….

    exibir mais
  • Cadastro de aluno de autoescola linguagem pascal, programa delphi
    879 palavras | 4 páginas

    Dicionário de Tipos: CAMPO | TIPO | REGISTRO | UTILIDADE | NOME | String[100] | TCadastro | Nome do Aluno | INSTRUTOR | String[100] | TCadastro | Instrutor | PLACA | String[7] | TCadastro | Placa do Carro | DATA | TDateTime | TCadastro | Data de Início do Processo | ATEORICAS | Integer | TCadastro | Número de Aulas Teóricas Realizadas | APRATICAS | Integer | TCadastro | Número de Aulas Práticas Realizadas | PTEORICA | Integer | TCadastro | Situação na Prova Teórica | PPRATICA |….

    exibir mais
  • Aula 1 Pascal Organizacao
    1559 palavras | 7 páginas

    Organização de programas em Pascal Leonardo Gresta Paulino Murta leomurta@ic.uff.br Vamos programar em Pascal! Mas... • • • • • Como um programa é organizado? Quais são os Apos de dados disponíveis? Como variáveis podem ser declaradas? Como atribuir valores às variáveis? Como entrada e saída básica de dados podem ser feitas? Vamos começar….

    exibir mais
  • Aula 02 ALG Introdu o Linguagem Pascal
    3964 palavras | 16 páginas

    2. Linguagem de Programação Pascal 2.1 Fundamentos de Programação de Computadores O que é um Programa de Computador? A utilização do computador para a resolução de problemas de forma automática traz grandes vantagens: Rapidez de execução; Precisão nos processamentos e resultados; Flexibilidade; Confiança nos resultados obtidos. Entretanto, o computador por si só não seria capaz de resolver o mais simples dos problemas que nos possa ocorrer. Para que ele o faça, é preciso descrever com detalhes….

    exibir mais
  • Pascal
    993 palavras | 4 páginas

    Linguagem Pascal. Resumo: Este artigo aborda a linguagem de programação Pascal desde o seu surgimento, mostra um pouco das instruções, apresenta um trecho de código, assim como sua forma de compilação, suas subdivisões e alguns tipos de compiladores. 1. Introdução: Pascal é uma linguagem de programação estruturada, que recebeu este nome em homenagem ao matemático Blaise Pascal. Foi criada em 1970 pelo suíço Niklaus Wirth, tendo em mente encorajar o uso de código estruturado.….

    exibir mais

Outros Trabalhos Populares