Lindemberg_santos

Obrigado Simon e eduardo

Olá pessoal, gostaria de saber porque todo programa que vejo tem isso: Procedure Algumacoisa; BeginFor i:=1 to 2 do writeln (' alguma coisa[i] ');readln(' alguma coisa[i]'); Qual a finalidade desse comando? e porque colocar no meio das frases?? Exemplo que achei na internet: Procedure CadastroV; BeginFor i:=1 to 2 do Begincont_venda := 0;Write (''Digite o c¢digo da venda:'');Readln (venda[i].cod_venda);Write (''Digite o c¢digo do produto vendido:'');Readln (venda[i].cod_prod_vendido);Write (''Digite a quantidade vendida:'');Readln (venda[i].quant_venda);Write (''Digite a data em que a venda foi efetuada (DD/MM/AAAA):'');Readln (venda[i].data_venda);Write (''Digite o valor da venda efetuada:'');Readln (venda[i].valor_venda); End;

Olá, estava sem nada para fazer, do nada veio essa ideia: Fiquei todo embananado ( me desculpem sou iniciante ) Program Times_Adivinhe ; Var Time1, Time2, Time3: String; Begin Time1:= Flamengo; Time2:= Vasco; Time3:= Botafogo; writeln('Tente advinhar uns dos meus 3 times de futbol'); IF Time1 and Time2 and Time3 then Begin writeln('voce acertou'); Else writeln('voce nao acertou'); end; End.

Olá scuzziato Não sou nenhum expert, é apenas minha opnião, vamos lá: Tenho um pentium dual core e5700, 2GB de memória, 320 HD, comprei na época por 850 Reais Por se tratar de um pentium, achei que ele não iria aguentar meu trampo com ele, mas me surpreendi, realizo textos, edições de vídeos, assisto filmes ( não da para assistir em HD ) , jogos de leve, etc. Já esse Intel Core i3 4010U 4GB 500GB 8GB SSD, pode ficar tranquilo, tem o dobro da potência do meu, Textos, filmes, edições, jogos (depende do jogo), roda tranquilo, por se tratar de um i3. Acho que não precisa do i5 para seu perfil.. A não ser que os programas que irá utilizar exiga muuuuito do PC, caso contrário, fique com o i3. Ps: Minha opnião'

Muito obrigado Simon, explica muito bem, aprendi de verdade UPDATE Melhorei o programa, olha só: Program Calc_media_Aluno ; Var nota1, nota2, nota3:Integer;serie, nome:string[20];media:real; Begin writeln('Informe o nome do aluno'); readln(nome); writeln('Informe a serie do aluno'); readln(serie); writeln('Informe a primeira nota'); readln(nota1); writeln('Informe a segunda nota'); readln(nota2); writeln('Informe a terceira nota'); readln(nota3); // Calc_Media media := (nota1+nota2+nota3) /3; // Condição e informações do aluno IF media>=7 then Begin write('Nome: ',nome); write(' '); write('Serie: ',serie); write(' Aprovado media ',media: 0:1); end Else Begin write('Nome: ',nome); write(' '); write('Serie: ',serie); write(' Reprovado media ',media: 0:1); end; End.

Olá Simon, compreendi tudo que o Sr falou, mas a minha pergunta ficou meio confusa mesmo, vou tentar te explicar melhor Como pode ver no print que mostrei os nomes estão colados assim: NomeLindemberg, Serie1°, eu queria deixar eles separados, assim: Nome Lindemberg, Serie 1°. (Estão colados) (Agora estão separados) Gostaria de separalos no pascal como no exemplo acima, o que devo colocar para separar os nomes?

Pessoal, criei meu primeiro programinha , mas estou com uma dúvida em relação ao programa, vamos lá: Na print que postei, onde tem: NomeLindemberg Serie1°B Media10 Queria deixar separados, assim> Nome Lindemberg Serie 1°B Media 10 o que devo adicionar para esse espaçamento? Vamos ao Programa: Program Calc_media ; Var nota1, nota2, nota3:Integer;serie, nome:string[20];media:real; Begin writeln('Informe o nome do aluno'); readln(nome); writeln('Informe a serie do aluno'); readln(serie); writeln('Informe a primeira nota'); readln(nota1); writeln('Informe a segunda nota'); readln(nota2); writeln('Informe a terceira nota'); readln(nota3); // Calc_Media media := (nota1+nota2+nota3) /3; // Resultado writeln('Nome',nome); writeln('Serie',serie); writeln('Media',media :4:1); End.