Programação e Estrutura de Dados
description
Transcript of Programação e Estrutura de Dados
![Page 1: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/1.jpg)
Programação e Estrutura de Dados
Prof. : Flavio Bellotti
![Page 2: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/2.jpg)
Outros tipos de unidades: dos, graph, windos
![Page 3: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/3.jpg)
![Page 4: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/4.jpg)
Identificadores ou Variáveis
![Page 5: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/5.jpg)
Palavras Reservadas
![Page 6: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/6.jpg)
Tipos de palavras mais utilizadas em Pascal
![Page 7: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/7.jpg)
![Page 8: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/8.jpg)
![Page 9: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/9.jpg)
![Page 10: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/10.jpg)
![Page 11: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/11.jpg)
![Page 12: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/12.jpg)
E X E R C Í C I
O S
E X E R C Í C I
O S
E X E R C Í C I
O S
E X E R C Í C I
O S
E X E R C
E X E R C Í C I
O S
E X E R C
![Page 13: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/13.jpg)
E X E R C Í C I O S1) Faça um programa que receba quatro números inteiros, calcule e mostre a soma destes números.
![Page 14: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/14.jpg)
1ª Solução em Pascal – EX1 PROGRAM EX1;USES CRT;VAR n1, n2, n3, n4, soma: INTEGER;BEGINCLRSCR;READLN(n1, n2, n3, n4);soma := n1 + n2 + n3 + n4;WRITELN(soma);READLN;END.
![Page 15: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/15.jpg)
2ª Solução em Pascal – EX1PROGRAM EX1;USES CRT;VAR n1, n2, n3, n4, soma: INTEGER;BEGINCLRSCR;WRITELN('Digite quatro números');READLN(n1, n2, n3, n4);soma := n1 + n2 + n3 + n4;WRITELN('Resultado da soma = ',soma);READLN;END.
![Page 16: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/16.jpg)
2) Faça um programa que receba três notas, calcule e mostre a média aritmética entre elas.
E X E R C Í C I O S
1ª Solução
![Page 17: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/17.jpg)
2ª Solução
![Page 18: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/18.jpg)
1ª Solução em Pascal – EX2 PROGRAM EX2;USES CRT;VAR nota1, nota2, nota3, media: REAL;BEGINCLRSCR;READLN(nota1, nota2, nota3);media := (nota1 + nota2 + nota3)/3;WRITELN(media:4:2);READLN;END.
![Page 19: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/19.jpg)
2ª Solução em Pascal – EX2 PROGRAM EX2;USES CRT;VAR nota1, nota2, nota3, soma, media: REAL;BEGINCLRSCR;WRITELN('Digite as três notas');READLN(nota1, nota2, nota3);soma := (nota1 + nota2 + nota3);media := soma/3;WRITELN(media:4:2);READLN; END.
![Page 20: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/20.jpg)
ATENÇÃO – SITUAÇÃO TIPO DE DADOS
![Page 21: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/21.jpg)
PROGRAM EX2;USES CRT;VAR nota1, nota2, nota3, media: REAL;BEGINCLRSCR;WRITELN('Digite a primeira nota');READLN(nota1);WRITELN('Digite a segunda nota');READLN(nota2);WRITELN('Digite a terceira nota');READLN(nota3);media := (nota1 + nota2 + nota3)/3;WRITELN('M‚dia = ',media:4:2);READLN; END.
3ª Solução em Pascal – EX2
![Page 22: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/22.jpg)
3) Faça um programa que receba três notas e seus respectivos pesos, calcule e mostre a média ponderada dessas notas.
E X E R C Í C I O S
1ª Solução
![Page 23: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/23.jpg)
2ª Solução
![Page 24: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/24.jpg)
1ª Solução em Pascal – EX3 PROGRAM EX3;USES CRT;VAR nota1, nota2, nota3, peso1, peso2, peso3, media: REAL;BEGINCLRSCR;READLN(nota1, nota2, nota3, peso1, peso2, peso3);media := (nota1 * peso1 + nota2 * peso2 + nota3 * peso3)/(peso1 + peso2 + peso3);WRITELN(media:5:2); READLN;END.
![Page 25: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/25.jpg)
2ª Solução em Pascal – EX3 PROGRAM EX3;USES CRT;VAR nota1, nota2, nota3, peso1, peso2, peso3: REAL; soma1, soma2, soma3, total, media: REAL;BEGINCLRSCR;WRITELN('Digite as três notas');READLN(nota1, nota2, nota3);WRITELN('Digite os três pesos');READLN(peso1, peso2, peso3);soma1:=nota1 * peso1;soma2:=nota2 * peso2;soma3:=nota3 * peso3;total:=peso1 + peso2 + peso3;media := (soma1 + soma2 + soma3)/total;WRITELN('M‚dia Ponderada = ',media:5:2);READLN;END.
![Page 26: Programação e Estrutura de Dados](https://reader035.fdocumentos.com/reader035/viewer/2022062816/5681649e550346895dd68335/html5/thumbnails/26.jpg)
PROGRAM EX3;USES CRT;VAR nota1, nota2, nota3, peso1, peso2, peso3: REAL; soma1, soma2, soma3, total, media: REAL;BEGINCLRSCR;WRITELN('Digite a 1¦ nota');READLN(nota1);WRITELN('Digite o peso da 1¦ nota');READLN(peso1);WRITELN('Digite a 2¦ nota');READLN(nota2);WRITELN('Digite o peso da 2¦ nota');READLN(peso2);WRITELN('Digite a 3¦ nota');READLN(nota3);WRITELN('Digite o peso da 3¦ nota');READLN(peso3);soma1:=nota1 * peso1;soma2:=nota2 * peso2;soma3:=nota3 * peso3;total:=peso1 + peso2 + peso3;media := (soma1 + soma2 + soma3)/total;WRITELN('M‚dia Ponderada = ', media:5:2);READLN;END.
3ª Solução em Pascal – EX3