napmartins

Não deu =/

Ele não encontra esse fp.exe

Obrigada Iago!

Porém toda vez que eu instalo não acho no meu computador em lugar algum o atalho para abrir o programa.

o que será que acontece?

Olá,

Gostaria de instalar o Free Pascal pois usarei na faculdade.

Algum download de confiança? E como instalar?

Obrigada!

Acabei fazendo desta maneira... Não sei se está correto mas fui pela minha lógica.

program cadeia (input{teclado}, output{video});procedure lerValor(var n: integer{s});Begin                write(output, 'Digite um valor: ');                readln(input, n);                while (n < 1) do               Begin                write(output, 'Digite um valor maior que 1: ');                readln(n);end;end;procedure exibeLinhas(n: integer{e});vari, j: integer;Beginfor i := n downto 1 doBeginfor j := i downto 1 do                              write(output, (n-i+1)*(n-i+1), '    ');writeln(output);end;                               end;varn: integer;begin                lerValor(n);                exibeLinhas(n);                readln();end.

Olá, gostaria que alguém me ajudasse a resolver esta questão... já fiz de várias formas mas não consegui resolve-la de jeito algum.

Obrigada.