# data[].attributes.body
https://drive.google.com/file/d/0B0ch8rcXaYLQdEJld0IyMy1Gdm8/view?usp=drivesdk

# data[].attributes.body
https://youtu.be/2ZT7OS04L3I

# data[].attributes.body
https://youtu.be/wlfgt5yvuwM

# data[].attributes.body
https://meocloud.pt/link/d05a720b-cf78-473f-9c77-1c24c22ce7ef/API%20SKETCH.skp/

# data[].attributes.body
https://www.tinkercad.com/things/jRTbigp0gl3-powerful-borwo/editv2

# data[].attributes.body
http://prezi.com/jcqjsipfimoa/?utm_campaign=share&utm_medium=copy

# data[].attributes.body
https://prezi.com/z-bi9z12rka1/berg-explorer-400/

# data[].attributes.body
Aplicação:
- Aplicação desenvolvida para ajudar pessoas de qualquer idade a manter um ritmo saudável. Ou seja, tem como objetivo partilhar vários planos de treino para várias idades de forma a organizar o exercício físico que fazemos a cada dia e ajudar a evitar a exaustão física.

Designer/ Especialista Técnico

- Até ao momento apenas tive que fazer o design da aplicação, além disso ajudei um pouco na escolha da ideia da aplicação a ser realizada.

# data[].attributes.body
Program valortabuada;

var tabuada,i,resultado:integer ;

Begin

writeln('Qual a tabuada');

readln(tabuada);

i:=0;

while(i<10) do

Begin

i:=i+1;

resultado:=tabuada*i;

writeln(tabuada,'x',i,'=',resultado);

End;

readln

End.

# data[].attributes.body
program jogo_do_galo;

uses crt;

var jogada:integer;

vez:char;

posicao:array[1..9] of string;

fim:integer;

i:integer;

vencedor:char;

{========================}

procedure teclas;

begin

clrscr;

writeln;

writeln('Teclas do Jogo');

writeln;

writeln(' 7 | 8 | 9 ');

writeln('---+---+---');

writeln(' 4 | 5 | 6 ');

writeln('---+---+---');

writeln(' 1 | 2 | 3 ');

end;

{=======================}

procedure jogo;

begin

gotoxy(30,10);

writeln('Jogo do Galo');

gotoxy(30,12);

writeln(' ',posicao[7],' | ',posicao[8],' | ',posicao[9]);

gotoxy(30,13);

writeln('---+---+---');

gotoxy(30,14);

writeln(' ',posicao[4],' | ',posicao[5],' | ',posicao[6]);

gotoxy(30,15);

writeln('---+---+---');

gotoxy(30,16);

writeln(' ',posicao[1],' | ',posicao[2],' | ',posicao[3]);

end;

{========================}

procedure verifica;

begin

if (posicao[1]+posicao[2]+posicao[3]) = 'XXX' then vencedor:='X';

if (posicao[4]+posicao[5]+posicao[6]) = 'XXX' then vencedor:='X';

if (posicao[7]+posicao[8]+posicao[9]) = 'XXX' then vencedor:='X';

if (posicao[1]+posicao[4]+posicao[7]) = 'XXX' then vencedor:='X';

if (posicao[2]+posicao[5]+posicao[8]) = 'XXX' then vencedor:='X';

if (posicao[3]+posicao[6]+posicao[9]) = 'XXX' then vencedor:='X';

if (posicao[7]+posicao[5]+posicao[3]) = 'XXX' then vencedor:='X';

if (posicao[1]+posicao[5]+posicao[9]) = 'XXX' then vencedor:='X';

if (posicao[1]+posicao[2]+posicao[3]) = 'OOO' then vencedor:='O';

if (posicao[4]+posicao[5]+posicao[6]) = 'OOO' then vencedor:='O';

if (posicao[7]+posicao[8]+posicao[9]) = 'OOO' then vencedor:='O';

if (posicao[1]+posicao[4]+posicao[7]) = 'OOO' then vencedor:='O';

if (posicao[2]+posicao[5]+posicao[8]) = 'OOO' then vencedor:='O';

if (posicao[3]+posicao[6]+posicao[9]) = 'OOO' then vencedor:='O';

if (posicao[7]+posicao[5]+posicao[3]) = 'OOO' then vencedor:='O';

if (posicao[1]+posicao[5]+posicao[9]) = 'OOO' then vencedor:='O';

if (i=9) and (vencedor=' ')

then begin

gotoxy(30,18);

writeln('Empate!');

writeln;

readln;

fim:=1;

end;

if (vencedor<>' ')

then begin

gotoxy(30,18);

writeln('O jogador ',vencedor,' ganhou!');

writeln;

readln;

fim:=1;

end;

end;

{***************************}

begin

vencedor:=' ';

for i := 1 to 9 do

posicao[i]:=' ';

fim:=0;

vez:='O';

i:=0;

while fim <> 1 do

begin

if vez = 'X'

then vez:='O'

else vez := 'X';

teclas;

jogo;

jogada:=0;

while (jogada=0) and (fim <> 1) do

begin

writeln;

write('Vez do jogador ',vez,': ');

readln(jogada);

if jogada=0

then fim:=1;

if posicao[jogada]=' '

then posicao[jogada]:=vez

else jogada:=0;

end;

verifica;

end;

end.