Passar de algoritmo para pascal
-
Upload
moraesdenise -
Category
Education
-
view
580 -
download
2
description
Transcript of Passar de algoritmo para pascal
![Page 1: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/1.jpg)
Denise Moraes - Unig - Algoritmo I 1
Passo a Passo
Passar de Algoritmo para
Pascal
![Page 2: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/2.jpg)
Denise Moraes - Unig - Algoritmo I 2
Diferença
Algoritmoé uma estratégia para
resolver um problema de forma correta, em tempo finito e capaz de ser executada mecanicamente. Dado um problema, podemos conceber mais de uma estratégia para resolvê-lo.
Programaé uma coleção
de instruções que descrevem uma tarefa a ser realizada por um computador. O termo pode ser uma referência ao código fonte, escrito em alguma linguagem de programação, ou ao arquivo que contém a forma executável deste código fonte.
![Page 3: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/3.jpg)
Denise Moraes - Unig - Algoritmo I 3
Exemplo de Programa
![Page 4: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/4.jpg)
Denise Moraes - Unig - Algoritmo I 4
Exemplo de Programa
![Page 5: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/5.jpg)
Denise Moraes - Unig - Algoritmo I 5
Exemplo de Programa
![Page 6: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/6.jpg)
Denise Moraes - Unig - Algoritmo I 6
Algoritmo Num3;variáveis N1,N2, Soma : inteiro; inicio escrever(" Digite o número 1"); ler(N1); escrever(" Digite o número 2"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
Algoritmo Pascal
![Page 7: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/7.jpg)
Denise Moraes - Unig - Algoritmo I 7
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma : inteiro; inicio escrever(" Digite o número 1"); ler(N1); escrever(" Digite o número 2"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 8: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/8.jpg)
Denise Moraes - Unig - Algoritmo I 8
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro;
inicio escrever(" Digite o número 1"); ler(N1); escrever(" Digite o número 2"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program soma;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 9: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/9.jpg)
Denise Moraes - Unig - Algoritmo I 9
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio
escrever(" Digite o número 1"); ler(N1); escrever(" Digite o número 2"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 10: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/10.jpg)
Denise Moraes - Unig - Algoritmo I 10
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 11: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/11.jpg)
Denise Moraes - Unig - Algoritmo I 11
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 12: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/12.jpg)
Denise Moraes - Unig - Algoritmo I 12
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 13: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/13.jpg)
Denise Moraes - Unig - Algoritmo I 13
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 14: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/14.jpg)
Denise Moraes - Unig - Algoritmo I 14
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 15: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/15.jpg)
Denise Moraes - Unig - Algoritmo I 15
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma); fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 16: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/16.jpg)
Denise Moraes - Unig - Algoritmo I 16
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma);
fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 17: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/17.jpg)
Denise Moraes - Unig - Algoritmo I 17
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma);
fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
![Page 18: Passar de algoritmo para pascal](https://reader035.fdocumentos.tips/reader035/viewer/2022081505/5562e3bbd8b42ad26c8b4a04/html5/thumbnails/18.jpg)
Denise Moraes - Unig - Algoritmo I 18
Algoritmo
Algoritmo Num3;variáveis N1,N2, Soma :inteiro; inicio escrever(" Digite o número 1:"); ler(N1); escrever(" Digite o número 2:"); ler(N2);Soma← (N1+N2);escrever(" O resultado da soma é :", soma);
fim.
Pascal
Program Num3;Var N1,N2, Soma:integer; begin write( 'Digite o número 1: ' ) ; readln( N1 ); write( 'Digite o número 2: ' ) ; readln(N2); Soma := (N1+N2); write( 'A somas dos valores é :', Soma); readln;end.
Inteiro = Integer escrever= write
Sinal de atribuição ← fica :=
ler= read
Apenas para dar uma pausa depois de dois Enter
vc sai do programareadln
= fazer quebra de linha