第2回早稲田大学プログラミングコンテスト

Submission #3996728

Source codeソースコード

var n,i,j,z:longint;
s:string;
f:array[1..100] of longint;

begin
readln(n);
readln(s);
fillchar(f,sizeof(f),63);
f[1]:=0;
if s[1]='X' then f[1]:=1;
for i:=1 to n do
  begin
  for j:=1 to 3 do
    if j+i>n then break
  else
    begin
    z:=0;
    if s[j+i]='X' then z:=1;
    if f[i]+z<f[i+j] then f[i+j]:=f[i]+z;
    end;
  end;
writeln(f[n]);

end.

Submission

Task問題	B - 雨上がり
User nameユーザ名	luogu_bot3
Created time投稿日時	2019/01/13 08:24:45 +0000
Language言語	Pascal (FPC 2.6.2)
Status状態	AC
Score得点	50
Source lengthソースコード長	374 Byte
File nameファイル名
Exec time実行時間	0 ms
Memory usageメモリ使用量	128 KB

Compiler messageコンパイルメッセージ

/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?

Test case

Set

Set name	Score得点 / Max score	Cases
All	50 / 50	case_000.txt,case_001.txt,case_002.txt,case_003.txt,case_004.txt,case_005.txt,case_006.txt,case_007.txt,case_008.txt,case_009.txt,case_010.txt,case_011.txt,case_012.txt,case_013.txt,case_014.txt,case_015.txt,case_016.txt,case_017.txt,case_018.txt,case_019.txt,case_020.txt,case_021.txt,case_022.txt,case_023.txt,case_024.txt,case_025.txt,case_026.txt,case_027.txt,case_028.txt,case_029.txt,case_030.txt,case_031.txt,case_032.txt,case_033.txt,case_034.txt,case_035.txt,case_036.txt,case_037.txt,case_038.txt,case_039.txt,case_040.txt,case_041.txt,case_042.txt

Test case

Case name	Status状態	Exec time実行時間	Memory usageメモリ使用量
case_000.txt	AC
case_001.txt	AC
case_002.txt	AC
case_003.txt	AC
case_004.txt	AC
case_005.txt	AC
case_006.txt	AC
case_007.txt	AC
case_008.txt	AC
case_009.txt	AC
case_010.txt	AC
case_011.txt	AC
case_012.txt	AC
case_013.txt	AC
case_014.txt	AC
case_015.txt	AC
case_016.txt	AC
case_017.txt	AC
case_018.txt	AC
case_019.txt	AC
case_020.txt	AC
case_021.txt	AC
case_022.txt	AC
case_023.txt	AC
case_024.txt	AC
case_025.txt	AC
case_026.txt	AC
case_027.txt	AC
case_028.txt	AC
case_029.txt	AC
case_030.txt	AC
case_031.txt	AC
case_032.txt	AC
case_033.txt	AC
case_034.txt	AC
case_035.txt	AC
case_036.txt	AC
case_037.txt	AC
case_038.txt	AC
case_039.txt	AC
case_040.txt	AC
case_041.txt	AC
case_042.txt	AC