11ºL 15/16

12ºL16/17

11ºN16/17

www.ticmania.net

Pascal

JAVA

VisualBasic

PTE

HOME

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, uma vez que 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.

Compilador - PascalZim ou Lazarus download
Template - Glossário
Template - Exercícios

Estrutura do programa

program somadoisnum;
{programa que soma dois números e exibe o resultado no ecrã}
var n1, n2, result : integer;

begin
readln(n1);
readln(n2);
result := n1 + n2;
writeln(result);
end.

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);

Aula2

Operadores

Bases do pascal

- 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

Aula3

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.

Fluxogramas

Elementos básicos fluxograma 

Resumo

Aulas 1,2,3

Download resumo .docx

Resumo de: Operadores, Atribuição e Variáveis.

Palavras Chave: Operador; Variável; Atribuir; Concatenar

Constantes

Nas linguagens de programação, as constantes são usadas para representar vários tipos de valores que permanecem imutáveis no programa.

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.

Aula4

Consolidação

Aula 4 (Fichas)

Comentários { bla, bla, ... } ou // bla, bla

Pascal Não é Case Sensitive (begin = BEGIN = BeGiN)

Consolidação dos conhecimentos adquiridos.

Resolução de exercícios práticos.

Aula5

Ciclo IF Estrutura Condicional

IF...THEN

SE...ENTÃO

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.

Introdução às estruturas condicionais. Operadores relacionais. Resolução de exercícios relativos aos temas abordados.

Aula5.1

Desafio 1, 2 e 3

1- Fluxograma + código - Elabora um algoritmo que verifique se um determinado número está dentro de um determinado intervalo de valores (10 a 15)
1.1- Fluxograma + código - Restruture o algoritmo para que o intervalo de valores seja introduzido pelo utilizador.
1.1.1. Fluxograma + código - Caso o utilizador digite um intervalo ex.(15...10), o programa deve ordenar os números em ordem crescente e verificar se o numero digitado está dentro do intervalo.

2- Fluxograma + código - Elabora um algoritmo compare 2 números e verifique qual deles é maior.
2.1. Fluxograma + código - Reestrutura o algoritmo para que verifique também se os números são iguais

3. Fluxograma + código - Elabora um algoritmo que verifique se um número introduzido pelo utilizador é positivo ou negativo.
3.1. Fluxograma + código - Restruture o algoritmo para 2 números.

Debug com PascalZim

Debug com PascalZim (Evitar os inputs/readln)

F7

Aula6

Ciclo IF Estrutura Condicional

IF...THEN...ELSE

SE...ENTÃO...SENÃO

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.

Estrutura condicional composta. Introdução aos operadores lógicos.

Resolução de exercícios relativos aos temas abordados.

Aula7

Exercícios de consolidação

Ciclo IF Estrutura Condicional

ELSE IF

SENÃO...SE

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).

Aula8

Exercícios de consolidação

Ciclo IF Estrutura Condicional

IF...THEN - IF...THEN - ELSE ELSE

SE...ENTÃO - SE...ENTÃO - SENÃO SENÃO

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).

uses crt;

clrscr

readkey

uses crt; {Usa a biblioteca CRT onde está a função ReadKey} Uses Crt;
A instrução (clrscr) usada para limpar o ecrã. Clrscr;
A instrução (readkey) pára o programa até que algo seja teclado. Readkey;
A instrução (Delay) atrasa em milissegundos 1000=1s. delay (1000);

Desafio 4

4- Fluxograma + código - Elabora um algoritmo que indique a nota qualitativa de um determinado aluno, tendo por base a nota quantitativa. O programa deve mostrar uma mensagem de "parabéns" no caso de o aluno ter sucesso ou "Tenta de novo" para o caso de insucesso.

//M.insuf <19
//insuf entre 20 e 50
//suf entre 50 e 75
//bom entre 75 e 90
// M.BOM >90

NOTA: o programa pode/deve ter 2 variáveis 1 do tipo real e outra do tipo string (variável string guardará a mensagem a mostrar ao utilizador).

4.1- Fluxograma + código - Restruture o algoritmo para que alerte o utilizador no caso de o valor introduzido ser superior a 100 ou inferior a 0.

4.1.1. Fluxograma + código - Restruture o algoritmo para que, caso se verifique o 4.1. dê oportunidade ao utilizador de reintroduzir a nota.

Algoritmo para análise

Uses Crt;

Label 1;

1:Clrscr;

Goto 1;

Readkey;

Program lesson4_Program1;
Uses Crt;
Label 1; { this is used with a goto statement }
Var Sel: String;
    N1,N2, Total : Real;
    YN : Char; { this is a character variable type, which holds single characters ONLY }
 Begin
        1:Clrscr;
        Total := 0; { always initialise integer/real variables }
        GotoXy(4,3);
        Writeln('1.Addition');
        GotoXy(4,4); { Coordenadas de posicionamento no ecrã }
        Writeln('2.Subtraction');
        GotoXy(4,5);
        Writeln('3.Exit');
        GotoXy(6,8);
        Write('Select: ');
        Sel := Readkey;

        If Sel = '1' {condition} Then
        Begin {more than one statement}
            ClrScr;
            Write('Input No.1:');
            Readln(N1);
            Write('Input No.2:');
            Readln(N2);
            Total := N1 + N2;
            Writeln('Addition: ',N1:2:3,' + ',N2:2:3,' = ',Total:2:3);
            Write('Press any key to continue...');
            Readkey;
            Goto 1; { this returns execution back to the beginning of the program (not recommended) }
        End; { Closing the if statement }

        If Sel = '2' Then { note that here we do not use an assignment statement }
        Begin
            ClrScr;
            Write('Input No.1:');
            Readln(N1);
            Write('Input No.2:');
            Readln(N2);
            Total := N1 - N2;
            Write('Subtraction: ');
            Write(N1:2:3,' - ',N2:2:3,' = ',Total:2:3);
            Write('Press any key to continue...');
            Readkey;
            Goto 1;
        End; {losing the if statement }

        If Sel = '3' Then
        Begin
            ClrScr;
            Write('Are you sure?(Y/N)');
            YN := Readkey;
            If YN = 'y' Then Halt; { 1 instruction, so no need of Begin..End }
            If YN = 'n' Then Goto 1; { the goto statement is not recommended for frequent use }
        End;
End.

Consolidação dos conhecimentos adquiridos. Resolução de exercícios práticos. Estrutura condicional CASE ... OF

Aula9

Estrutura Case

Ciclo IF Estrutura Condicional

CASE

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

Program Pzim ;
Var a,b,op : Integer;
 Begin
    writeln('digite um numero para opção CASE 1,2 ou 3');
    readln(op);
   Case op Of // O case necessita de end
        1 : Begin
            Writeln ('Digitou CASE 1');
        End;
       

        2 : Begin
            Writeln ('Digitou CASE 2');
        End;
       
        3 : begin
            Writeln ('Digitou CASE 3');
            Writeln ('Neste CASE pode somar 2 numeros');
            readln(a,b);
            Writeln ('Soma dos numeros = ',a+b);
        end
        Else
            Writeln ('Não há CASE para ti');
   End; // Fim do CASE
 End.

Consolidação dos conhecimentos adquiridos. Resolução de exercícios práticos. Estrutura condicional CASE ...

Desafio 5

5- Fluxograma + código - Com recurso ao CASE elabore uma calculadora que permita efetuar as operações entre 2 números, operações de + - X e /. Consoante a opção do utilizador.

5.1- Fluxograma + código - Restruture o algoritmo para que, na divisão, alerte o utilizador no caso de b=0, indicando que não é possível dividir por 0.

5.1.1. Código - Restruture o algoritmo para que, permita ao utilizador continuar a fazer cálculos. O programa apenas termina se o utilizador escolher a opção sair.

Aula10

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;
        end;
end.

Consolidação dos conhecimentos adquiridos. Resolução de exercícios práticos. Ficha de avaliação com consulta.

Aula11

Avaliação/ Revisões

Randomize;

trunc

sqrt

Consolidação dos conhecimentos adquiridos. Resolução de exercícios práticos. Ficha de avaliação.

Estruturas de repetição

Repeat until

While ... do

Estruturas de repetição

Repeat until	While ... do	for ... to 10 do
Programa que impreme números em ordem crescente de 1 a 10.	Programa que impreme números em ordem crescente de 1 a 10.	Programa que impreme números em ordem crescente de 1 a 10.
Program Pzim ;//9 var ct:integer; Begin ct:=0;     repeat         ct:=ct+1;         writeln('num ct.',ct);     until (ct=10);     writeln('Total ct.',ct); End.	Program Pzim ; var ct:integer; Begin Ct:=0;   while (ct<=10) do     begin      writeln ('contador =  ',ct);      ct:=ct+1;     end; End.	Program Pzim ;//11 var ct:integer; Begin Ct:=0;   for ct:=1 to 10 do     begin      writeln('ordem crescente:', ct);     end; End.

6- Fluxograma + código - Com recurso aos ciclos de repetição elabore um algoritmo que permita calcular a tabuada de um número digitado pelo utilizador, o programa deve também perguntar o número de início e de fim da tabuada. (ex: Tabuada do 3 entre 5 e 21)

    6.1. Fluxograma + código - Com recurso ao ciclo while.

    6.2. Fluxograma + código - Com recurso ao ciclo Repeat.

Aula13

Revisões

while CONDIÇÃO do

Ciclo de repetição

Ciclo While

Contador

Balanço das atividades desenvolvidas ao longo do primeiro período. Preenchimento das fichas de auto-avaliação.

Revisões de matéria dada. Introdução ao ciclo de repetição "While". Conceito de contador. Resolução de exercícios práticos.

Aula13_1

Revisões

CicloWhile

7- Fluxograma + código - Construa um programa que solicite ao utilizador um numero inteiro e identifique a quantidade de caracteres do número digitado. (Ciclo While, função trunc)

7.1. Fluxograma + código - Com recurso ao ciclo while. Construa um algoritmo que solicite ao utilizador o número de telemóvel. O programa deve verificar se o número tem 9 dígitos.

Aula14

Ciclo de repetição

Ciclo repeat

Repeat

...

Programa

...

Until CONDIÇÃO

Introdução ao ciclo de repetição "repeat". Conceito de contador. Resolução de exercícios práticos.

Aula15

For to do

for variável := valor-inicial to valor-final do

for ... to ... do

for ... downto ... do

Introdução ao ciclo de repetição for Loop. Resolução de exercícios práticos.

Conjugação dos ciclos estudados.

9- Fluxograma + código - Construa um programa que solicite ao utilizador um número inteiro. Esse número inteiro deve estar entre 5 e 50. Se o utilizador digitar um número fora do intervalo o programa deve permitir ao utilizador voltar a inserir o número. (Ciclo Repeat)

9.1. Fluxograma + código - Altere o programa anterior tendo em conta o seguinte: Ex. Se no programa anterior (ponto 9) o utilizador digitou 6, então o programa deve, agora, dar oportunidade ao utilizador de digitar  6  números inteiros e verificar qual deles é o maior. (Ciclo For , Ciclo IF)

Aula16

PPTX intro. vetores

FicheiroVetorMatriz

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; 

arrnum[i] --- Valor do array

Revisões. Introdução aos arrays e vetores

Aula17

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

MATRIZ Sintaxe:

<nome array>: array  [dimensões] of <tipo>; 

mat:array[1..5,1..3] of integer;

const

type

Aula19

FicheiroVetorMatriz

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

Building Applets

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

Mapa de colocação

Documentos para o dossier de estágio (Em execução)

- Plano de Trabalho Individual.docx

- Ficha identificação aluno estagiário.doc

- PROTOCOLO_JRE.docx

- Relatório.docx

- 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.

Formação Páginas web básico

Aula extra. Introdução ao funcionamento das páginas web. Ferramentas de edição e transferência de ficheiros. Linguagem de marcação HTML.

Aula25

Visual Basic

Introdução ao Visual Studio 2015.

Aula26

Balanço das atividades desenvolvidas ao longo do ano. Preenchimento das fichas de auto-avaliação.

Pré-requisitos