Jump to content

Search the Community

Showing results for tags 'pascal'.

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Comunidade
    • Sugestões, Críticas ou Dúvidas relativas ao P@P
    • Acerca do P@P
  • Comunidade a Trabalhar
    • Apresentação de Projectos de Programação
    • Downloads
    • Revista PROGRAMAR
  • Desenvolvimento Geral
    • C
    • C++
    • Java
    • Pascal
    • Python
    • Bases de Dados
    • Dispositivos Móveis
    • Outras Linguagens
  • Desenvolvimento Orientado para Web
    • PHP
    • HTML
    • CSS
    • Javascript
    • Outras Linguagens de WebDevelopment
    • Desenvolvimento Web
  • Desenvolvimento .NET
    • C#
    • Visual Basic .NET
    • ASP.NET
    • WPF & SilverLight
  • Software e Sistemas Operativos
    • Software de Produtividade
    • Sistemas Operativos
    • Apresentação de Software
  • Informática
    • Interfaces Visuais
    • Computação Gráfica
    • Algoritmia e Lógica
    • Segurança e Redes
    • Hardware
    • Electrónica e Automação Industrial
    • Matemática
    • Software de Contabilidade e Finanças
    • Dúvidas e Discussão de Programação
  • Outras Áreas
    • Notícias de Tecnologia
    • Dúvidas Gerais
    • Discussão Geral
    • Eventos
    • Anúncios de Emprego
    • Tutoriais
    • Snippets / Armazém de Código
  • Arquivo Morto
    • Projectos Descontinuados
    • System Empires

Blogs

  • Blog dos Moderadores
  • Eventos
  • Notícias de Tecnologia
  • Blog do Staff
  • Revista PROGRAMAR
  • Projectos
  • Wiki

Categories

  • Revista PROGRAMAR
  • Tutoriais
  • Textos Académicos
  • Exercícios Académicos
    • Exercícios c/ Solução
    • Exercícios s/ Solução
  • Bibliotecas e Aplicações
  • Outros

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

  1. procedure Validate; assembler; asm mov eax,ADDRESS call eax end; seu fazer isso em uma dll funfa corretamente,porém se usar isso em um .exe da aparece ''acesso violado''... Usando Written e Creathread como fica em .exe ?
  2. BHAMF

    Variáveis

    Olá a todos, estou precisando saber todos os tipos de variáveis (todos literalmente como Ansistring e tal) do Pascal para o meu projeto o Lipiinn Program, porém não estou conseguindo achar aqui nas minhas pesquisas, se alguém puder me ajudar, fico muito agradecido, obrigado desde já! BHAMF.
  3. Maou

    memoria corrompida

    Olá a todos, estou com um grande problema, fiz uma tabela ascii e esta dando sigsegv run time erro 217. aqui esta o código que gera o erro. {código parcial da tabela ascii} uses Crt,SysUtils; const S:array[0..32] of string=('Caractere Nulo-NUL', 'Come'+#135+'o De Cabe'+#135+'alho De Transmiss'+#198+'o-SOH', 'Come'+#135+'o Do Texto-STX', 'Fim Do Texto-ETX', 'Fim De Transmiss'+#198+'o-EOT', 'Interroga-ENQ', 'Confirma'+#135#198+'o-ACK', 'Sinal Sonoro-BEL', 'Volta Um Caractere-BS', 'Tabula'+#135#198+'o
  4. BHAMF

    [Resolvido] Pastas Pascal

    Queria saber como faço para criar pastas em Pascal, alguém aí sabe algo sobre? Estou à espera de respostas. Obrigado desde já
  5. Maou

    [Resolvido] Record Com Case

    Olá a todos, E minha primeira vez por aqui é estou com duvida meio banal sobre record com case. Eu sei usar records com variantes mais só de uma maneira, consigo usar assim program Dados; uses Crt; type TDados=record Case D:integer of 1:(S:integer); 2:(X:array[1..5] of integer); end; var Ds:TDados; I:integer; begin writeln('Digite 1 Para Uma Entradas, E 2 Para 5 Entradas.'); readln(Ds.D); ClrScr; If Ds.D=1 then begin writeln('Digite Um Numero.'); readln(Ds.S); end else if Ds.D=2 then for I:=1 to 5 do begin ClrScr; writeln('Digite Um Numero Para A Posição
  6. daniel_silva

    Não mostrar o que o utilizador digita

    Boa noite pessoal. Gostava de saber se é possível não mostrar o que o utilizador digita. Vou dar um exemplo: O normal é: Nome de utilizador: daniel_silva Palavra Passe: teste O que gostava de saber se dava para fazer era: Nome de utilizador: daniel_silva Palavra Passe: ***** Ou seja, não mostrava as letras da palavra passe e metia outros caracteres a aparecer, mas que assumi-se como "teste", o que o utilizador referia para a palavra passe. Abraço.
  7. BigMachine3

    Dúvidas em centrar um texto

    Bom dia!! Estou com dúvidas em centrar um texto. Eu queria que um certo texto e números fica-se da seguinte maneira, imaginando que o seguinte quadro é a tela da linha de comandos: -------------------------------------------------------------------- I I I I I abcd 120.000 s I I querty 160.000 s I
  8. BHAMF

    Teclas de seta(readkey)

    Olá, conheço o P@P a algum tempo, porém não tinha criado minha conta, sempre quis responder algumas pessoas mas também tenho minhas dúvidas, a minha dúvida é a seguinte, estou criando um Software cujo o nome é Lipïïnn Program ©, nele tem uma procedure chamada, janela1, e nesta janela1 certamente abre uma janela (feita em códigos ASCII claro) e nesta janela tem dois readkeys no caso deveria ter só um, mas se eu colocar só um ele confunde tecla com letra, como faço pra resolver isso? Obrigado desde já! procedure janela1; var ATUAL : INTEGER; Construtor_de_janela : integer; tecla : char; b
  9. daniel_silva

    [Resolvido] Eliminar registos no ficheiro

    Boa tarde programadores Gostava de saber como é que elimino um registo no ficheiro... Fico à espera de dicas! 😄 Obrigado 👍 Abraço.
  10. BigMachine3

    Ideias para fazer um trabalho

    Eu pretendia fazer um trabalho com records mas estou sem ideias. Poderiam me ajudar? (Atendendo que estou no 10º ano de escolaridade, pretendia um trabalho apropriado para os meus conhecimentos)
  11. daniel_silva

    Contador de registos em um ficheiro

    Boa tarde pessoal. 😄 Quero saber como é que faço para contar os registos que estão num ficheiro? Por exemplo, imaginem que tenho um ficheiro de entradas e quero fazer um contador para contar as entradas que estão escritas no ficheiro? Estão a perceber a minha dúvida? Fico a aguardar uma resposta. Obrigado 👍
  12. Hugo1337

    Contadores e acumuladores

    Receba a quantidade de idades de K indivíduos. K representa essa quantidade e deve ser digitada pelo usuário. A variável Idade armazena cada uma das K idades digitadas. Calcule e mostre a somatória dessas idades. O que fiz até agora: Program pzim; var num,cont,k,idade,somat:integer; Begin Repeat Writeln('Digite quantos índividuos serão analisados'); readln(num); If num<=0 then Writeln('ERRO! Não existe quantidades de individuos nula ou negativa'); Until num>0; for cont:=1 to num do begin writeln('Digite a ', cont, 'a idade: '); readln(k); idade:=k; somat:=num*(idade)-1; writeln('
  13. LUCAS SILVA

    ajuda com estrutura pascal

    galera é o seguinte, tenho esse códigozinho ai, que é uma calculadora de áreas, que usa o comando de repetição " repeat " fiquei enrolado, e nao consegui fazer esse mesmo código usando a repetição " while " , e com ' for " voces poderiam me ajudar por favor? agradeço Program qc; var opcao:integer; a1,a2,a3:real; lado:real; base, altura:real; Begin repeat clrscr; writeln('MENU'); writeln('1: PARA CALCULAR A AREA DO QUADRADO'); writeln('2: PARA CALCULAR A AREA DO RETANGULO'); writeln('3: PARA CALCULAR A AREA DO TRIANGULO'); writeln('4: PARA SAIR'); writeln(' QUAL SUA OPCAO ?'); readln (
  14. Agradeço a vossa ajuda na seguinte questão? Uso uma DBGrid para lançamentos de dados. De forma a agilizar o processo quero poder lançar valores numerários usando apenas o teclado numérico, e para isso, necessito que o programa aceite o uso do “ponto” no teclado numérico como separador decimal. Quero que quando carregue no “ponto” to teclado numérico o sistema “veja” uma vírgula. Como posso fazer isto ? Obrigado p'la ajuda!
  15. Boa tarde, Pretendo criar um programa em Free Pascal em que use vários tipos de variáveis, estruturas de repetição, etc. No projeto pretendo ter variaveis do tipo string, char, integer, real. Pretendo usar a estrutura de seleção case Pretendo utilizar as estruturas de repetição: for, while e/ou repeat Pretendo ainda utilizar arrays (unidimensionais e/ou bidimensionais) Precisava que alguém me desse ideias para projeto. Não quero códigos, nem nada do género. Apenas queria ideias. Alguém me pode ajudar nisso? Desde já obrigado
  16. oktane

    Duvida sobre arrays

    Boa noite, estou a criar este tópico com o propósito de solicitar a vossa ajuda na construção de um problema em pascal sobre um campeonato de futebol formado por grupos. A minha duvida é sabendo que terei de guardar como informação o resultado (resultado do jogo/ golos sofridos e marcados)e os pontos de cada equipa qual a melhor maneira de formar as matrizes ( a minha principal dificuldade é a introdução de dois valores por jogo - golos de cada equipa). Queria utilizar o mínimo de matrizes possível por grupo. Será esta a melhor maneira?: equipas| 1 | 2 |
  17. Hugo1337

    Iniciante em Pascal

    Olá, estou iniciando em pascal e estou encontrando dificuldades, preciso de ajuda nesse exercício: Receba três números onde o primeiro deve ser maior do que zero e menor que 20. O segundo deve ser negativo e o terceiro representa um número qualquer. Calcule a soma de cada número elevado ao quadrado. Se a soma resultar um valor inferior a 1000 solicite novos dados. O que eu fiz: Program EX2 ; var A,B,C,D:real; Begin Repeat Writeln('Digite o 1º numero'); readln(A); If A>0 then begin end; If a<20 then begin end else repeat Writeln('Digite o 2º numero'); readln(B); If B<0 then begi
  18. Carlos Henrique

    Recursividade

    Usando Pascal, como montar um programa recursivo que mostre em vídeo a seguinte sequencia? 5 10 15 20 25 6 12 18 24 7 14 21 8 16 9 Não estou conseguindo montar a fórmula para achar os valores das linhas e colunas. Nesse caso vamos supor N = 5.
  19. Ora então boa noite... Tenho reparado ao longo dos anos que este é um ponto de confusão para os programadores iniciantes (e até para alguns experientes) e como perceber isto é algo absolutamente essencial num programador a sério (e para os outros também), lembrei-me de iniciar este tópico. Vou aplicar isto a Pascal, mas a verdade é que o conceito é necessário em qualquer linguagem. Para quem não sabe, nos procedimentos e funções permitem a passagem de parâmetros (valores ou variáveis), que serão inseridos no momento da chamada desse procedimentou ou função, e serão transmitidos
  20. daniel_silva

    Problema com a chave primária

    URGENTE Boa noite programadores. Estou a fazer um trabalho para Linguagem de Programação é um sistema de stock de stand. Onde regista os clientes, fornecedores, entradas e saídas das viaturas. Como é óbvio só existe uma matrícula por cada carro, e queria usar uma chave primária para o campo matrícula. Por exemplo, quando introduzir uma matrícula e essa matrícula já estiver registada no ficheiro aparece uma mensagem a dizer que essa matrícula já foi registada. O que eu quero mesmo saber, é como vou fazer para o programa saber que a matrícula já existe. Fico a guardar pela resposta!
  21. jprw

    Tema de programa em pascal

    Tenho que fazer um programa em pascal usando todo o conhecimento (ou pelo menos algum) de Aplicações Informáticas no 12º ano, mas não sei em que Tema me deva basear por favor HELP!
  22. Ola, como é que eu devo fazer para colocar um cronometro num ciclo repeat, ou seja, quando o cronometro chegar a 30. o ciclo repeat pára de funcionar. Nota: eu sei fazer o cronómetro.
  23. joao_o grande

    [Resolvido] Array dentro de Record

    posso fazer isto??? var comida: Record coordenadasx: array [0..77] of byte; coordenadasy: array [0..23] of byte; n_com:[1..35] of byte; end; Begin for comida.n_com:=1 to 35 do begin comida.coordenadasx[comida.n_com]:=Random(74)+3; comida.coordenadasy[comida.n_com]:=Random(19)+3; Gotoxy(comida.coordenadasx[comida.n_com],comida.coordenadasy[comida.n_com]) Writeln(#178); end; [/Code] O meu objetivo é criar cerca de 35 caracteres aleatoriosna tela e que sejam facilmente identificaveis. Ou seja, Se o caracter aleatorio coinci
  24. rkixa

    Calculadora Pascal com Case

    Boas, Venho pedir ajuda aqui aos gurus da programação para que me deêm um toque do que o que tenho mal aqui neste programa. program calculadora; uses crt; var n1, n2, conta: integer; operacao: char; begin clrscr; writeln ('Inserir 1º valor: '); readln (n1); writeln('Escolha a operacao [+, -, *, /]: '); readln(operacao); writeln ('Inserir 2º valor: '); readln (n2); case operacao of '+': conta:= n1+n2; '-': conta:= n1-n2; '*': conta:= n1*n2; '/': conta:= n1/n2; else writeln('Invalido'); writeln('O
  25. joao_o grande

    Erro: passagem por referência

    Quando tento correr este programa ele dá o seguinte erro: Apenas variáveis podem ser passadas por refer^ncia para um subprograma. Afinal qual é o problema?? Nunca me apareceu um erro destes. O meu objetivo é fazer uma procedure que faça um quadrado ou retangulo mt completo para usar noutros programas(é por isso que não o fiz no programa principal.. Program quadrado_retangulo; Procedure forma_quadrado_retangulo (var x1,x2,y1,y2,cor_limites:byte;Preencher:boolean;Cor_Preenchimento:byte); var comprimento,largura,i,j,x1_P,x2_P,y1_P,y2_P:byte; Begin window(1,1,80,25); for i:= x1 to x2 do
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.