diff options
| author | Nguyễn Gia Phong <vn.mcsinyx@gmail.com> | 2019-12-15 15:09:13 +0700 |
|---|---|---|
| committer | Nguyễn Gia Phong <vn.mcsinyx@gmail.com> | 2019-12-15 15:09:13 +0700 |
| commit | 9e28e4c7b67c54229df11d355047ac8a88ea1817 (patch) | |
| tree | 0d9d40db69613c2c49564a3f1987a005d61f4db3 /THT/B/QG-2014/sample.pas | |
| parent | 67393f42f41ab92219deb549f711121c4dab845b (diff) | |
| download | cp-9e28e4c7b67c54229df11d355047ac8a88ea1817.tar.gz | |
Normalize pathname
Diffstat (limited to 'THT/B/QG-2014/sample.pas')
| -rw-r--r-- | THT/B/QG-2014/sample.pas | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/THT/B/QG-2014/sample.pas b/THT/B/QG-2014/sample.pas deleted file mode 100644 index c8b5e17..0000000 --- a/THT/B/QG-2014/sample.pas +++ /dev/null @@ -1,21 +0,0 @@ -uses dic; - -var - answer1: char; - answer2, answer3, answer4: longint; - -begin - answer1 := get_char_at_pos(4); - writeln('Vi tri thu 4 cua xau can tim la: ', answer1); - - answer2 := count_char('c'); - writeln('So luong ki tu c trong tu can tim la: ', answer2); - - answer3 := count_char('a'); - writeln('So luong ki tu a trong tu can tim la: ', answer3); - - answer4 := count_char('n'); - writeln('So luong ki tu n trong tu can tim la: ', answer4); - - answer('can'); -end. |