11965 - Extra Spaces

[iriz7482]

I've got W.A on this problem no matter how I fixed my code . Please help me

Code: Select all

remove after A.C :D

always have problems with string processing...

[yan yan]

first, you must

Code: Select all

scanf("%d",&k);getchar();

indeed

Code: Select all

scanf("%d\n",&k);

second, the last character can be space. It's possible

[iriz7482]

first, you must

Code: Select all

scanf("%d",&k);getchar();

indeed

Code: Select all

scanf("%d\n",&k);

second, the last character can be space. It's possible

Thank you very much, I got A.C
anyway, I tried to use fflush(stdin) instead of getchar() but it didn't work

[sss0905063]

WHY WA?? here is my code-

removed after AC

[robot]

Hi SS....
you have a simple mistake..The problem says print a blank line between test case but not at all..your program print always a blank line.
try this case:
2
1
<space><space>
1
<space><space>i am a student.
output:
Case 1:
<space>
Case 2:
<space>i am a student.
ASU(SUST)

[sss0905063]

thanx robot bro.got AC. sometimes silly mistakes make it more than worst.

[rahian]

I got Accepted for this problem but i would like to know something more:
#include<iostream>
#include<cstring>
#include<cstdio>
using namespace std;
int main()
{
long t,n,i,cas,j,f=0,ln,ff;

freopen("in.txt","r",stdin);
while(cin>>t)
{
cas=0;
while(t)
{
cin>>n;
getchar();
if(f)
cout<<endl;
f=1;
cout<<"Case "<<++cas<<":"<<endl;

while(n)
{
j=i=0;

string line,line2;
getline(cin,line);
//getchar();
ln=line.length();
//cout<<ln<<endl;
while(ln>=i)
{
ff=0;
line2[j++]=line[i];

if(line[i]==' ')
{
while(line[i]==' ')
i++;
ff=1;
}
if(ff==0)
i++;
}
line2[j-1]='\0';
//cout<<line2<<endl;
for(i=0;i<j-1;i++)
putchar(line2[i]);
cout<<endl;
//puts(line2);
line.clear();
line2.clear();
n--;
}
t--;
}

}
return 0;
}
>> here //cout<<line2<<endl;// doe's not work but when i use:
for(i=0;i<j-1;i++)
putchar(line2[i]);
it has work and got AC, I got accepted by using another way but this //cout<<line2<<endl;// statement is not working
why???????

[Hasselli]

Code: Select all

procedure Shift(var s: string; ind: Integer);
var
  i: Integer;

begin
  for i := ind to length(s) do
    s[i] := s[i + 1];
  setlength(s, length(s) - 1);
end;

var
  i, j, t, tt, n: Integer;
  s: string;

begin
  Readln(t);
  for tt := 1 to t do
  begin
    Readln(n);
    Writeln('Case ', tt, ':');
    for i := 1 to n do
    begin
      Readln(s);
      for j := 1 to Length(s) do
        While (s[j] = ' ') and (s[j + 1] = ' ') do
          Shift(s, j);
      Writeln(s);
    end;
  end;
end.

Why it is wrong?

[brianfry713]

The output should have a blank line between cases.

[Hasselli]

Code: Select all

procedure Shift(var s: string; ind: Integer);
var
  i: Integer;

begin
  for i := ind to length(s) do
    s[i] := s[i + 1];
  setlength(s, length(s) - 1);
end;

var
  i, j, t, tt, n: Integer;
  s: string;

begin
  Readln(t);
  for tt := 1 to t do
  begin
    Readln(n);
    Writeln('Case ', tt, ':');
    for i := 1 to n do
    begin
      Readln(s);
      for j := 1 to Length(s) do
        While (s[j] = ' ') and (s[j + 1] = ' ') do
          Shift(s, j);
      Writeln(s);
    end;
    Writeln;
  end;
end.

How about this?

[brianfry713]

Don't print an extra newline at the end.

[Hasselli]

Code: Select all

procedure Shift(var s: string; ind: Integer);
var
  i: Integer;

begin
  for i := ind to length(s) do
    s[i] := s[i + 1];
  setlength(s, length(s) - 1);
end;

var
  i, j, t, tt, n: Integer;
  s: string;

begin
  Readln(t);
  for tt := 1 to t do
  begin
    Readln(n);
    Writeln('Case ', tt, ':');
    for i := 1 to n do
    begin
      Readln(s);
      for j := 1 to Length(s) do
        While (s[j] = ' ') and (s[j + 1] = ' ') do
          Shift(s, j);
      Writeln(s);
    end;
    if tt < t then
   Writeln;
  end;
end.

And this?

[brianfry713]

I believe your problem is that a Pascal string only holds up to 256 characters and a line might be up to 500 characters.

[brianfry713]

Input:

Code: Select all

1
1
012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789

Output should be:

Code: Select all

012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789

[Hasselli]

Input:

Code: Select all

1
1
012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789

Output should be:

Code: Select all

012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789

Output is right.