Novo site em: http://www.ticmania.net/tic3/rec/programacao/pascal/pascal.html |
Qual a melhor linguagem para aprender a programar! Dicas para escolher
a linguagem mais adequada para quem está a iniciar: 1-Uma linguagem de programação para iniciantes! Devemos ter consciência que ao
longo da carreira como programador será sempre necessário aprender uma
linguagem de programação nova. Pois todas têm vantagens e desvantagens. Interessa começar por uma
linguagem de programação que ajude a aprender lógica de programação! Só
depois de aprender o básico, o raciocínio, é que deve aprender uma outra
linguagem mais profissional (exemplo java, C, python,
C#,). É um facto que algumas pessoas conseguem aprender programação começando
a programar em linguagens profissionais, contudo estes casos estão
relacionados com vários fatores, entre eles, a motivação, o domínio do
raciocínio lógico…. 2-Uma linguagem em português ou inglês. 2.1- Para algumas pessoas o inglês
é um entrave, no entanto, não conheço linguagens de programação profissionais
em português. O que faz com que o inglês seja incontornável. Se o objetivo é apenas aprender a logica/
raciocínio da programação, então o Visualg
serve perfeitamente. Exemplo: algoritmo "BoasVindas" var nome: CARACTERE inicio ESCREVA ("Olá! Digite o
seu nome: ") LEIA (nome) ESCREVA ("Seja bem vindo ", nome, "!") fimalgoritmo 2.2- Se o objetivo é final é passar para uma linguagem
de programação profissional, então
a melhor linguagem para começar é o pascal, uma vez que se assemelha mais à
linguagem humana, facilitando a aprendizagem do raciocínio logico da
programação, permitindo ainda que a passagem para uma linguagem profissional
seja mais fácil. Exemplo: program BoasVindas; var nome : string; begin readln(nome); writeln(‘Seja bem vindo ’, nome,’!’); end. |
CURSO PROFISSIONAL TÉCNICO DE GESTÃO DE EQUIPAMENTOS INFORMÁTICOS |
||||||||||||||||||||||||||||||||||||||||
|
|
Recursos |
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula1 |
|
E-mail Regras da sala Pré-requisitos |
|
|
Apresentação aos alunos. Regras de funcionamento da
sala de aula. Apresentação do programa da disciplina. Introdução à
programação em pascal. Download e instalação do compilador “Lazarus” |
||||||||||||||||||||||||||||||||||
|
Introdução ao pascal |
Editor |
Lazarus download |
|||||||||||||||||||||||||||||||||||||
|
Estrutura do programa |
program somadoisnum; begin |
|
|||||||||||||||||||||||||||||||||||||
|
Output |
writeln(result); |
|
|||||||||||||||||||||||||||||||||||||
|
|
|
Instruções Os 3 principais tipos de instruções: Entrada: ReadLn Atribuição: area:= base * altura / 2 Saída:
WriteLn |
|
||||||||||||||||||||||||||||||||||||
|
EXPRESSÕES MATEMÁTICAS |
+ adição ; - subtração ; * multiplicação ; / divisão ; DIV divisão |
writeln('2 + 5 = ' ,
2+5);
|
|
||||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Operadores |
- Operadores. - Precedência dos operadores. |
Reais ------- div / Inteiros --- div Algumas Palavras Reservadas em Pascal: Until; Boolean;
Char; String; Case; Downto; And; While; Write; Do; End; Begin; Integer; Read;
Or; For; To; Program; Real; Repeat; If; Else; Go To; Var; Array; |
|
Desenvolver algoritmos aplicando operadores matemáticos
com recurso a input e output |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|||||||||||||||||||||||||||||||||||
|
|
Variáveis |
Tipos de variáveis: Char String Real Integer boolean |
var result,
potencia, base:real; begin base:=2; potencia:=8; result:=exp(potencia*ln(base)); writeln('',result:2:0); readln(); end. |
|
Desenvolver algoritmos aplicando operadores matemáticos
e variáveis com recurso a input e output. Exercícios com strngs e caracteres. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Constantes |
|
PROGRAM exemplo; CONST { Declaração
de constantes } PI =
3.1415926; VAR { Declaração de Variáveis
} Raio,Area_da_Circunferencia : REAL; BEGIN { Comandos do Programa } write('Forneça o raio: '); readln (Raio); Area_da_Circunferencia := PI * ( Raio * Raio ); { Area = PI * R2 =
PI * R * R } writeln('Área = ',Area_da_Circunferencia); writeln(PI); readln; END. |
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Consolidação Aula 4 (Fichas) |
|
Comentários { bla, bla, ... } Pascal Não é Case Sensitive (begin = BEGIN = BeGiN)
|
|
Consolidação dos conhecimentos adquiridos. Resolução de exercícios práticos. |
||||||||||||||||||||||||||||||||||
|
|
|
||||||||||||||||||||||||||||||||||||||
|
|
Ciclo IF Estrutura Condicional |
IF…THEN Estrutura
Condicional simples SE = IF ENTÃO = THEN INÍCIO = BEGIN FIM = END |
var X, Y : Integer; begin Writeln ('Digite dois Números:'); { Mostra no ecrã a mensagem} Readln (X, Y); { Lê os dois números } If (X > Y) Then {Condição - SE X for maior que Y} Writeln ('X é Maior que Y, e seu valor é = ', X); end.
v |
|
Introdução às estruturas condicionais. Operadores
relacionais. Resolução de exercícios relativos aos temas abordados. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Ciclo IF Estrutura Condicional |
IF…THEN…ELSE Estrutura
Condicional composta SE = IF ENTÃO =
THEN SENÃO = ELSE INÍCIO =
BEGIN FIM = END |
var X, Y : Integer; begin Writeln
('Entre com dois Números:'); Readln (X, Y); If ((X > Y) or (Y <> 0)) Then Begin Writeln
('X é Maior que Y OU y é diferente de 0'); Writeln
('O Valor de X é =', X); End {FIM} else writeln
('FALSO nenhuma das condições propostas não se verifica'); readln; end.
v |
|
Estrutura condicional composta. Introdução aos
operadores lógicos. Resolução de exercícios relativos aos temas abordados. |
||||||||||||||||||||||||||||||||||
|
|
Exercícios de consolidação Ciclo IF Estrutura Condicional |
ELSE IF Estrutura
Condicional composta IF …. THEN ELSE IF… Then ELSE |
var a, b, c:real; Begin readln(a, b, c); If (a>b)
and (b>c)then writeln('maior a') else if (b>a) and (b>c) then writeln('maior
b') else writeln('maior c');
End. |
|
Consolidação dos conhecimentos adquiridos. Resolução de exercícios práticos. Estrutura condicional
composta (ELSE IF). |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Exercícios de consolidação Ciclo IF Estrutura Condicional |
IF…THEN - IF…THEN - ELSE ELSE Estrutura Condicional Aninhada A
estrutura condicional aninhada é semelhante à estrutura condicional com AND |
Var X, Y, A, B : Integer; Begin Readln (X,Y,A,B); If (X > Y) Then { Entrará no Próximo If apenas se a variável X for
maior que a variavel Y } If (A > B) Then Writeln
('X é maior que Y e A é maior que B') {Sem
";"} Else Writeln
('A não é Maior que B')
{Sem ";"} Else Writeln
('X não é maior que Y'); readln; End. |
|
Consolidação dos conhecimentos adquiridos. Resolução de
exercícios práticos. Estrutura condicional composta aninhada (If---THEN IF...THEN). |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
Consolidação dos conhecimentos adquiridos. Resolução de
exercícios práticos. Estrutura condicional CASE ... OF |
|||||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Estrutura Case Ciclo IF Estrutura Condicional |
CASE … OF Case X Of No comando CASE o seletor tem
que ser do tipo char, integer ou boolean. O case é muito utilizado na
construção de menus |
Var Y, X : Integer; Begin Readln (X, Y); Case X Of 1 : Begin Y :=
4; Writeln ('Entrou
no Primeiro alvo'); End; 2 : Begin Y := 3;
Writeln ('Entrou no Segundo alvo');
End; 3 : Writeln ('Entrou no Terceiro alvo'); Else Writeln
('Entrou no Else'); End; End. |
|
Consolidação dos conhecimentos adquiridos. Resolução de
exercícios práticos. Estrutura condicional CASE ... |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Revisões |
|
Acentuação no pascal (procurar letra na tabela ascii) Writeln('Hoje
',chr(138),' dia de'); Hoje é dia de Funções ORD e CHR writeln('valor absoluto de z ',
ord('A') ); writeln('valor absoluto de z ',
chr(65) ); Program
Program1a_Lesson10; Uses
Crt; Label Return;
{used respectively with the goto statement; beware of it} Var
SEL : Integer; YN : Char; Begin Return: Clrscr; Writeln('[1].PLAY
GAME'); WRITELN('[2].LOAD
GAME'); WRITELN('[3].MULTIPLAYER'); WRITELN('[4].EXIT
GAME'); Writeln('note: Do
note press anything except'); Writeln('numbers;
otherwise an error occurs!'); Readln(SEL); If SEL = 1 then Begin Writeln('Are you
able to create a game'); Writeln('of yourself
using pascal??'); Delay(2000); Goto Return; |
|
Consolidação dos conhecimentos adquiridos. Resolução de
exercícios práticos. Ficha de avaliação com consulta. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Avaliação/ Revisões |
|
|
|
Consolidação dos conhecimentos adquiridos. Resolução de
exercícios práticos. Ficha de avaliação. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula12 |
Autoavaliação |
|
var i:
integer; begin i:=0; repeat i:= i+1; write(i) until i>=5 ; readln; end. |
|
Balanço das atividades desenvolvidas ao longo do
primeiro período. Preenchimento das fichas de auto-avaliação. |
||||||||||||||||||||||||||||||||||
|
|
|
||||||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Revisões Ciclo de repetição Contador |
while CONDIÇÃO do |
|
|
Revisões de matéria dada. Introdução ao ciclo de
repetição “While”. Conceito de contador. Resolução de exercícios práticos. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Revisões CicloWhile |
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Ciclo de repetição |
Repeat .. Programa .. Until CONDIÇÃO |
|
|
Introdução ao ciclo de repetição “repeat”. Conceito de
contador. Resolução de exercícios práticos. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
for variável
:= valor-inicial to valor-final do |
|
Introdução ao ciclo de repetição for Loop. Resolução de
exercícios práticos. Conjugação dos ciclos estudados. |
||||||||||||||||||||||||||||||||||||
|
|
|
|
|||||||||||||||||||||||||||||||||||||
|
|
|
||||||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Vetores |
VETOR Sintaxe: <nome array>:
array [dimensão] of <tipo>; vet:array[1..6] of integer; MATRIZ Sintaxe: <nome array>:
array [dimensões] of <tipo>; mat:array[1..5,1..3]
of integer; {matriz 19x3} |
arrnum[i] --- Valor do array I ---------- Posição do array Arrnum ----- Nome do array EXEMPLO ------ WRITELN('A
posição do array ', i, ‘tem o valor de’,arrnum[i]); |
|
Revisões. Introdução aos arrays e vetores |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
Aula extra. Introdução ao funcionamento das páginas
web. Ferramentas de edição e transferência de ficheiros. Linguagem de
marcação HTML. |
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Vetores |
GotoXY(10,10); |
Program
Example6; uses Crt; { Program to demonstrate the GotoXY function. } begin ClrScr; GotoXY(10,10); Write('posicao coluna 10 linha 10'); GotoXY(50,20); Write('posicao coluna 50 linha 20'); GotoXY(1,22); readln; end. |
|
Continuação da aula anterior. Construção do glossário em pascal. Revisões. Introdução aos arrays e vetores |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula18 |
|
|
|
|
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Matrizes |
|
program ex3; var matriz:array[1..2,1..2] of integer; poslinha,poscoluna:integer; Begin writeln('Digite os valores'); for poslinha:=1 to 2 do for poscoluna:=1 to 2 do
readln(matriz[poslinha,poscoluna]); for poslinha:=1 to 2 do for poscoluna:=1 to 2 do writeln(matriz[poslinha,poscoluna]); readln; end.
|
|
Exercícios com vetores. Aprofundamento dos conhecimentos sobre matrizes.
Resolução de exercícios. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Info
de 25/02/2016 |
|
Entrega do projeto pascal
04 de abril. Apresentação do trabalho dia 07 de abril. Data limite para
entrega da correção do teste 29 de fevereiro |
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula20 |
Revisões vetores aula16 |
|
|
|
Aula de revisões sobre vetores. Introdução ao JAVA |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula21 |
Revisões matrizes aula19 |
|
program ex3; var vet:array[1..4,1..4] of integer; posl,posc:integer; Begin writeln('Digite os valores'); for posl:=1 to 4 do for posc:=1
to 4 do readln(vet[posl,posc]); begin for posl:=1
to 4 do for posc:=1
to 4 do begin if (posl=posc) then writeln('linha 4 coluna 4
',vet[posl,posc] );
end; readln; end; end. |
|
Aula de revisões Matrizes. Java, primeiro
programa. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula Extra |
|
|
|
|
Aula extra. Colaboração com a disciplina de IMEI |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula22 |
Página JAVA JAVA
|
JAVA |
package
aulas; import java.util.Scanner; public
class Aula11 { public static void main(String[]args){ Scanner input=new Scanner(System.in); double b, a, area; // Declaração de variáveis
System.out.println("digite o valor da base"); b=input.nextDouble(); // Lê o
valor da variável b digitada pelo utilizador
System.out.println("digite o valor da altura"); a=input.nextDouble(); area = a * b; System.out.println(" "+area); } } |
|
Introdução ao JAVA. Instalação do compilador NetBeans e
JDK. Primeiro programa. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula23 |
JAVA Applets |
/* * To change this license header,
choose License Headers in Project Properties. * To change this template
file, choose Tools | Templates * and open the template
in the editor. */ package aulascon; /** * * @author user */ import java.applet.Applet; import java.awt.Graphics; import java.awt.Color; public class SimpleApplet extends Applet{ String text = "I'm
a simple applet"; public void init() { text = "I'm a
simple applet"; setBackground(Color.cyan); } public void start() { System.out.println("starting..."); } public void stop() {
System.out.println("stopping..."); } public void destroy() {
System.out.println("preparing to unload..."); } public void paint(Graphics g){
System.out.println("Paint"); g.setColor(Color.blue); g.drawRect(0,
0, getSize().width -1, getSize().height -1); g.setColor(Color.red); g.drawString(text,
15, 25); } } |
|
Balanço das atividades desenvolvidas ao longo do
segundo período. Preenchimento das fichas de auto-avaliação. |
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
Estágio |
Documentos para o dossier de estágio (Em execução) - Plano
de Trabalho Individual.docx - Ficha
identificação aluno estagiário.doc - Fichas
Assiduidade_Avaliação.xlsx - Curriculum
vitae europeu site -- (Minuta) Nota: Os documentos do dossier de estágio devem ser
impressos e organizados numa pasta (semelhante à apresentada na imagem). |
|
|
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
||||||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula24 |
Página JAVA JAVA
|
|
POO programação orientada a objetos Classes && Objects Behaviour
&& atribute package
aulascon; class
Minhaclass { static void dizola()
{ System.out.println("OLÁ
mundo!"); } public static void main(String[
] args) { dizola(); } } |
|
Revisões Java. Conceito de POO, Classes e Objects Behaviour e atribute. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula25 |
|
|
|
Introdução ao Visual Studio 2015. |
|||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
Aula26 |
|
|
|
|
Balanço das atividades desenvolvidas ao longo do ano.
Preenchimento das fichas de auto-avaliação. |
||||||||||||||||||||||||||||||||||
|
|
|
|
|
|
|
||||||||||||||||||||||||||||||||||
|
|
|