pascal 26069번 붙임성 좋은 총총이 (백준)
var n,m,i,j,k,f,p:int64;a:array[1..2000]of string;x,y,z:string;beginp:=1;a[1]:='ChongChong';readln(n);for i:=1 to n do beginreadln(z); //문자열 두개 입력받기m:=length(z);f:=0;x:='';y:='';for j:=1 to m do begin //문자열을 공백기준으로 두개로 나누기if z[j]=' ' then begin f:=1;endelse begin if f=0 then x+=z[j] else y+=z[j];end;end;f:=0;k:=0;for j:=1 to p do begin //춤을 추는 사람이 있는지 확인 if x=a[j] then f+=1; if y=a[j] then k+=1;..
Pascal/BAEKJOON
2025. 2. 26. 18:44
공지사항
최근에 올라온 글
최근에 달린 댓글
- Total
- Today
- Yesterday
링크
TAG
- java
- Lazy Propagation
- 누적합
- 세그먼트 트리
- 그래프
- 정렬
- 1835번
- 덱
- Segment Tree
- 스택
- 오프라인 쿼리
- 백준
- XOR
- 최소 스패닝 트리
- Krustal
- find
- 최대공약수
- DFS
- 브루트포스
- C++
- C언어
- 기하학
- 누적 합
- BFS
- 1835
- PASCAL
- 그리디
- 플로이드
- DP
- union
| 일 | 월 | 화 | 수 | 목 | 금 | 토 |
|---|---|---|---|---|---|---|
| 1 | 2 | 3 | 4 | 5 | ||
| 6 | 7 | 8 | 9 | 10 | 11 | 12 |
| 13 | 14 | 15 | 16 | 17 | 18 | 19 |
| 20 | 21 | 22 | 23 | 24 | 25 | 26 |
| 27 | 28 | 29 | 30 |
글 보관함