PATB1040 有几个PAT（25）（25 分）
Posted hebust
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了PATB1040 有几个PAT（25）（25 分）相关的知识，希望对你有一定的参考价值。
一点25分的样子都没有
#include<cstdio>
#include<string.h>
using namespace std;
int main(){
long long ans=0;
int P=0,T=0;
char arr[100010];
scanf("%s",arr);
for(int i=0;i<strlen(arr);i++){
if(arr[i]==‘T‘)
T++;
}
for(int i=0;i<strlen(arr);i++){
if(arr[i]==‘A‘)
ans+=P*T;
if(arr[i]==‘P‘)
P++;
if(arr[i]==‘T‘)
T--;
if(ans>1000000007)
ans%=1000000007;
}
printf("%ld",ans);
return 0;
}
以上是关于PATB1040 有几个PAT（25）（25 分）的主要内容，如果未能解决你的问题，请参考以下文章