👤

In fisierul text in.txt se afla pe prima linie un numar natural n cuprins intre 2 si 1000 iar pe a doua linie n numere naturale de cel putin 2 si cel mult 9 cifre. Scrieti un program Pascal care afiseaza pe ecran numarul de elemente care sunt patrate perfecte.

Răspuns :

Răspuns:

program perfecte;

var f: text;

   n,num,i,contor: integer;

begin

 assign(f,'in.txt'); reset(f);

 readln(f,n);

 for i:=1 to n do

   begin

     read(f, num);

     if sqrt(num)=int(sqrt(num))

        then inc(contor);

   end;

  close(f);

  writeln(contor);

end.

Explicație:

Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de sprijin, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite pentru acces rapid.


Wix Learning: Alte intrebari