În fisierul vector.in se găsesc pe prima linie un număr natural n iar pe linia următoare n nunere naturale care reprezintă componentele unui vector v. sa se scrie in fișier toate componentele vectorului v care au 2 cifre.
Răspunsuri la întrebare
Răspuns de
0
var a:array of integer;
i,c,n,n1:integer;
t:text;
begin
assign(t,'vector.in');
reset(t);
readln(t,n);
setlength(a,n);
for i:=0 to n-1 do
read (t,a[i]);
close(t);
assign(t,'vector.in');
rewrite(t);
for i:=0 to n-1 do begin
n1:=a[i];
c:=0;
while n1<>0 do begin
n1:=n1 div 10;
inc(c);
end;
if c=2 then write(t,a[i],' ');
end;
close(t);
end.
i,c,n,n1:integer;
t:text;
begin
assign(t,'vector.in');
reset(t);
readln(t,n);
setlength(a,n);
for i:=0 to n-1 do
read (t,a[i]);
close(t);
assign(t,'vector.in');
rewrite(t);
for i:=0 to n-1 do begin
n1:=a[i];
c:=0;
while n1<>0 do begin
n1:=n1 div 10;
inc(c);
end;
if c=2 then write(t,a[i],' ');
end;
close(t);
end.
Alte întrebări interesante
Chimie,
8 ani în urmă
Chimie,
8 ani în urmă
Biologie,
8 ani în urmă
Matematică,
9 ani în urmă
Engleza,
9 ani în urmă
Matematică,
9 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă
#include <fstream>
using namespace std;
ifstream f("vector.in");
ofstream g("vector.out");
/* În fisierul vector.in se găsesc pe prima linie un număr natural n iar pe linia următoare n nunere naturale care reprezintă componentele unui vector v.
Sa se scrie in fișier toate componentele vectorului v care au 2 cifre.
*/
int n,i,a[100],c,x;
int main()
{
f>>n;
for(i=1; i<=n; i++)
f>>a[i];
for(i=1; i<=n; i++)
{
x=a[i];
c=0;
while(x)
{
c++;
x/=10;
}
if(c==2)g<<a[i]<<" ";
}
}