Joao didy

Olá, me chamo João e possuo uma matéria de programação em Pascal e o professor quer que fazemos um programa que acho praticamente impossível em apenas 3 dias vim aqui tentar conseguir alguma ajuda. Faça um programa que funcione como um cadastro de clientes utilizando vetores. As informações a ser cadastradas são: nome, idade, peso, altura, sexo e profissão e CPF. O programa deve ter um menu com as seguintes opções: 1 – Cadastrar cliente 2 – Consultar cliente por nome 3 – Consultar cliente por CPF 4 – Editar informações do cliente (consultar por nome) 5 – Mostrar todos os clientes 6 – Mostrar todas as mulheres 7 – Mostrar todos os homens 8 – Calcular média de: idade, peso, altura 9 – Calcular média de: idade, peso, altura dos homens 10 – Calcular média de: idade, peso, altura das mulheres 11 - SAIR obs : gosto muito de programar em pascal mas trocou de professor e ele quer que a gente faça isso . o código que fiz até o momento : não consigo ir mais alem que isso Program cadastro ; var v:array [1..100] of real; nome,sx,prof:char; idade,x:real; peso,alt,cpf,N,i:integer; Begin for i :=1 to N do; Begin writeln('Quantos cadastros serão feitos'); readln (N); writeln('1 Cadastrar cliente'); writeln('2 Consultar cliente por nome '); writeln('3 Consultar cliente por CPF'); writeln('4 Editar informações do cliente (consultar por nome) '); writeln('5 Mostrar todos os clientes '); writeln('6 Mostrar todas as mulheres '); writeln('7 Mostrar todos os homens '); writeln('8 Calcular média de: idade, peso, altura '); writeln('9 Calcular média de: idade, peso, altura dos homens '); writeln('10 Calcular média de: idade, peso, altura das mulheres '); writeln('11 SAIR'); readln(x); if(x=1) then begin writeln('digite o nome'); readln(nome); writeln('digite a idade'); readln(idade); writeln('digite o peso'); readln(peso); writeln('digite a altura'); readln(alt); writeln('digite o sexo'); readln(sx); writeln('digite a profissao'); readln(prof); writeln('digite o cpf'); readln(cpf); readln (v); if(x=2)then begin writeln('digite o nome'); End; end

program Eleicao; var x , n begin cd1 := 0; cd2 := 0; cd3 := 0; cd4 := 0; for i=1 to N do begin writeln('Para votar no candidato 1 digite -1'); writeln('Para votar no candidato 2 digite -2'); writeln('Para votar no candidato 3 digite -3'); writeln('Para votar no candidato 4 digite -4'); readln(x); if (x = '1') then cd1:= cd1+1 else if (x = '2') then cd2 := cd2+1 else if (x = '3') then cd3 := cd3+1 else if (x ='4')then cd4 := cd4+1 ; end. Em uma eleição presidencial existem quatro candidatos e x eleitores. Os votos são informados através de códigos. Os dados utilizados para a contagem dos votos obedecem à seguinte codificação: 1, 2, 3, 4 = voto para os respectivos candidatos; 5 = voto nulo; 6 = voto em branco; Elabore um programa que leia o código do candidato em um voto. Calcule e escreva: - total de votos para cada candidato; - total de votos nulos; - total de votos em branco; - ganhador da eleição - último candidato da eleição - diferença de percentual de votos entre o primeiro e o último candidato Gostaria de saber como faço o for = 1 to X do pois n sei já que n tem critério de parada e também como apresentar o maior e menor dos 4 candidatos Att, João

1. Descrição O objetivo é a implementação de algoritmos de ordenação para as entidades de uma biblioteca 2. O que deve ser feito , os algoritmos de ordenação por seleção, permutação e partição devem ser utilizados na ordenação das entidades (livro, usuário, empréstimo), consideradas na biblioteca. Cada entidade deve ser ordenada por um único algoritmo de ordenação. As entidades devem ser ordenadas por algoritmos de ordenação diferentes.e. Como sugestão, pode-se considerar um dos atributos de cada entidade. A listagem das entidades deve apresentar os elementos ordenados.