pinheiro18

Em 17/06/2017 às 09:52, Simon Viegas disse:

Alguma novidade?

 

No aguardo.

Consegui resolver a questão, agradeço pela ajuda

program numero_primo;

uses crt;

function primo (v:integer):boolean;
var
   i,cont:integer;
begin
    cont:=0;
    for i:=1 to v do
    begin
         if v > 0 then
         begin
              if (v mod i)=0 then
                 cont:= cont + 1;
          end;
    end;
    if cont = 2 then
       result:= true
       else
           result:= false;
end;

var
    r: boolean; 
    valor: integer;
Begin
  write('Informe um valor: ');
  readln(valor);
  r:= primo(valor);
  writeln;
  writeln(r);
readkey;
End.

Galera, alguém sabe me explicar como saber se um número digitado pelo usuário é primo ou não usando função, e retornando o valor em boolean?

Olá pessoal, gostaria que alguém explicasse como faz para mostrar uma linha ou coluna especifica de uma matriz.