3 replies to this topic

[o garoto de programa]

Olá a todos, eu sou novato aqui no fórum, li vários dos posts que têm por aqui, e vi que tem muita gente boa aqui, então resolvi me cadastrar, e começar a participar dessa comunidade, afim de aprender mais sobre programação, e depois quem sabe começar a ajudar também os menos experientes!
Bem, eu sou estudante do 1º período do curso de Sistemas de Informação, no Cefet daqui de Alagoas, e estou estudando Programação em Pascal agora. Muito legal, eu já aprendi a fazer coisas bem legais, mas ontem deu um surto no professor, e ele passou dois programas pra que a gente fizesse, pra entregar em um mês: um pra simular o genius (lembram daquele brinquedinho da estrela?) e outro pra emitir uma folha de cheque preenchida. Então, se alguém puder me dar alguma ajuda, se já viu algo parecido, sei lá, toda ajuda será bem vinda!

desde já agradeço a todos, e o que eu puder ajudar, ajudo na boa!

Edição feita por: o garoto de programa, 14/04/2004, 15:19.

[xleandro]

Eh realmente o professor pego pesado ai ein heheh, faz isso em pascal neh mto simples não, mas tipo, ele não deu informação nenhum de como fazer? oq tem q fazer e talz, pq tipo, nem conhecer esse genius eu conheço heheh e como assim emitir uma folha de cheque preenchida? ele não deu mais informação nenhuma não? Soh falo isso?...

[]`s

[o garoto de programa]

cara, é o seguinte: o programa do cheque vai ler o nome do cliente, o nome da pessoa ou empresa que vai receber o cheque, a data e a quantia; vai retornar como se fosse uma folha de cheque, além do mais, contendo a quantia por extenso também... é complicado pacas; o segundo é ainda mais complicado: o computador vai sortear uma letra (A, B, C ou D) e escrever na tela; apaga e o usuário deve escrever a letra; apaga e o computador escreve a primeira letra, e uma nova (das mesmas quatro, num novo sorteio), apaga e o usuário deve indicar as duas letras... isso até acontecer uma das duas possibilidades: ou o usuário erra e o computador ganha o jogo, ou o usuário vence, quando ele degitar uma sequência de 20 letras (que tédio...)...
cara, nem sei por onde começar... tive umas idéias meio malucas mas estou cheio de coisas aqui no trabalho, então na semana que vem vou tentar começar a fazer esse programa, e se você tiver alguma ajuda, será muito bem vinda!

senão eu piro o cabeção logo de vez...

valeu!

[alansantana]

pode me ajudar
Olá
Bom dia
Tenho esses quatro popgramas, e preciso passa-los para pascal.
Se conhece as duas linguagens ajude me por favor.
Mande para alan.santana@gmail.com ou
alan_santana@terra.com.br
Obrigado

programa_01

#include <stdio.h>
/* So definindo os limites da tabela.em pascal acho que é com CONST */
#define LINHA 3
#define COLUNA 3

void LeMatriz(int MAT[][COLUNA])
{ int i,j;
for(i=0;i<LINHA;i++)
for (j=0;j<COLUNA;j++)
scanf("%d",&MAT[i][j]);
}


int SomaLinha(int MAT[][COLUNA],int ATUAL_COLUNA,int LINHA_ATUAL)
{ if(ATUAL_COLUNA>=COLUNA)
return 0;
else
return SomaLinha(MAT,ATUAL_COLUNA+1,LINHA_ATUAL)+MAT[LINHA_ATUAL][ATUAL_COLUNA];
}


int SomaTudo(int MAT[][COLUNA],int LINHA_ATUAL,int COLUNA_ATUAL)
{ if(LINHA_ATUAL>=LINHA)
return 0;
else
return SomaLinha(MAT,COLUNA_ATUAL,LINHA_ATUAL)+SomaTudo(MAT,LINHA_ATUAL+1,COLUNA_ATUAL);
}

main()
{
int MAT[LINHA][COLUNA]={0};
int i;
LeMatriz(MAT);
printf ("\n%d\n",SomaTudo(MAT,0,0));
}


____________________________________________________________________
programa_02

#include <stdio.h>
#include <stdlib.h>
#define VEZES 5

struct NODO{
int DADO;
struct NODO *PROX;
} typedef Elemento;


void InsereFinal(Elemento *INICIO,Elemento *NO)
{
if (INICIO->PROX==NULL)
{ INICIO->PROX=NO;
return;
}
else
InsereFinal(INICIO->PROX,NO);
}


void InsereNaPosicao(Elemento *INICIO,Elemento *NO,int CONTADOR,int POS)
{
if (CONTADOR==POS-1)
{ NO->PROX=INICIO->PROX;
INICIO->PROX=NO;
return;
}
else
InsereNaPosicao(INICIO->PROX,NO,CONTADOR+1,POS);
}

/* Só pra ver como tá a bagunça */
void ImprimeLista(Elemento *INICIO)
{
if (INICIO==NULL)
return;
else
{ printf (" %d ",INICIO->DADO);
ImprimeLista(INICIO->PROX);
}
}

main()
{
Elemento *HEAD=malloc(sizeof(Elemento));
Elemento *TEMP;
int QTDE=0;
int X=1;
int POS;

HEAD->PROX=NULL;
while (X<=VEZES)
{ TEMP=malloc(1*sizeof(Elemento));
TEMP->PROX=NULL;
printf ("\nInserir elemento:");
scanf("%d",&(*TEMP).DADO);
printf("\nPosicao:");
scanf("%d",&POS);

if (POS>QTDE)
{ if (QTDE==0)
InsereFinal(HEAD,TEMP);
else
InsereFinal(HEAD->PROX,TEMP);
}
else if (POS>0)
InsereNaPosicao(HEAD,TEMP,0,POS);
else printf ("digite uma posicao maior que zero");
QTDE++;
X++;
ImprimeLista(HEAD->PROX);
}
else
{ printf (" %d ",INICIO->DADO);
ImprimeLista(INICIO->PROX);
}
}

main()
{
Elemento *HEAD=malloc(sizeof(Elemento));
Elemento *TEMP;
int QTDE=0;
int X=1;
int POS;

HEAD->PROX=NULL;
while (X<=VEZES)
{ TEMP=malloc(1*sizeof(Elemento));
TEMP->PROX=NULL;
printf ("\nInserir elemento:");
scanf("%d",&(*TEMP).DADO);
printf("\nPosicao:");
scanf("%d",&POS);

if (POS>QTDE)
{ if (QTDE==0)
InsereFinal(HEAD,TEMP);
else
InsereFinal(HEAD->PROX,TEMP);
}
else if (POS>0)
InsereNaPosicao(HEAD,TEMP,0,POS);
else printf ("digite uma posicao maior que zero");
QTDE++;
X++;
ImprimeLista(HEAD->PROX);
}

free(HEAD);
}
____________________________________________________________________
programa_03

#include <stdio.h>
#include <stdlib.h>

struct NODO
{ int DADO;
struct NODO *PROX;
} typedef Elemento;


void TelaOpcao()
{ printf ("\n1-Inserir Numero");
printf ("\n2-Sair\n");
}


void InsereLista(Elemento *INICIO,Elemento *NO)
{
if (INICIO->PROX==NULL)
{ NO->PROX=INICIO->PROX;
INICIO->PROX=NO;
return;
}
else
InsereLista(INICIO->PROX,NO);
}

void ImprimeLista(Elemento *INICIO,int QTDE)
{
if (INICIO==NULL)
printf ("\nLista vazia\n");
else
{ while (INICIO!=NULL)
{ printf (" %d ",INICIO->DADO);
INICIO=INICIO->PROX;
}
printf ("\nElementos na lista:%d\n",QTDE);
}
}

void PrimeiraOpcao(Elemento *INICIO,int *QTDE)
{
int NUM;
Elemento *TMP=malloc(sizeof(Elemento));
printf("\nNúmero (digite -1 para imprimir a lista)");
scanf("%d",&NUM);
if(NUM!=-1)
{ TMP->DADO=NUM;
InsereLista(INICIO,TMP);
(*QTDE)++;
}
else
ImprimeLista(INICIO->PROX,(*QTDE));
}

void SegundaOpcao(Elemento *HEAD)
{ free(HEAD); }

main()
{
int OPCAO,QTDE=0;
Elemento *HEAD=malloc(sizeof(Elemento));

do
{
TelaOpcao();
scanf("%d",&OPCAO);
switch(OPCAO) {
case 1:
PrimeiraOpcao(HEAD,&QTDE);
break;
case 2:
SegundaOpcao(HEAD);
break;
default: printf ("\nNao existe essa opcao");
}
}while (OPCAO && OPCAO!=2);
}
____________________________________________________________________
programa_04

#include <stdio.h>
#include <stdlib.h>
#define VEZES 10

struct NODO
{ int NUM;
struct NODO *PROX;
} typedef Elemento;


void Opcoes()
{ printf ("\n1-Inserir Numero\n2-Remover Numero\n");
printf ("\n3-No Final da Lista\n4-No inicio da lista\\n");
printf ("\n>>");
}

void LeituraNumero(Elemento *TMP)
{ printf ("\nDigite o numero a ser inserido:");
scanf("%d",&(*TMP).NUM);
}

void InsereNumero(Elemento *INICIO,Elemento *NO,int OP)
{ if (OP==4)
{ NO->PROX=INICIO->PROX;
INICIO->PROX=NO;
}
else if (OP==3)
{ if (INICIO->PROX!=NULL)
while (INICIO->PROX!=NULL)
INICIO=INICIO->PROX;

NO->PROX=NULL;
INICIO->PROX=NO;
}
}

void RemoveNumero(Elemento *INICIO,int OP)
{ Elemento *TMP;

if (OP==4)
{
TMP=INICIO->PROX;
INICIO->PROX=INICIO->PROX->PROX;
free(TMP);
}
else if (OP==3)
{ if (INICIO->PROX!=NULL)
{ while (INICIO->PROX->PROX!=NULL)
INICIO=INICIO->PROX;
free(INICIO->PROX);
INICIO->PROX=NULL;
}
}
}

void ImprimeLista(Elemento *NO)
{ while (NO!=NULL)
{ printf (" %d ",NO->NUM);
NO=NO->PROX;
}
}

main()
{
Elemento *HEAD=malloc(sizeof(Elemento));
Elemento *TMP;
int OP1,OP2,X=0;

while (X<VEZES)
{
Opcoes();
scanf("%d %d",&OP1,&OP2);

if (OP1==1)
{ TMP=malloc(sizeof(Elemento));
LeituraNumero(TMP);
InsereNumero(HEAD,TMP,OP2);
}
else if (OP1==2 && HEAD->PROX!=NULL)
RemoveNumero(HEAD,OP2);

ImprimeLista(HEAD->PROX);
X++;
}
free(HEAD);
}