Problem

4 /8


Kaedah Terbina dalam

Theory Click to read/hide

Pascal mempunyai banyak rutin untuk bekerja dengan rentetan.  Banyak daripada mereka dipanggil menggunakan notasi titik dan dipanggil kaedah. Senarai lengkap kaedah manipulasi rentetan boleh didapati dalam talian. 
Mari kita berkenalan dengan sebahagian daripada mereka. s := 'aAbBcC' sUp := huruf besar(s); // sUp = "AABBCC" - kaedah yang menukar setiap aksara rentetan kepada huruf besar sLow := huruf kecil // sLow = "aabbcc" - kaedah yang menukar setiap aksara rentetan kepada huruf kecil Kaedah sentiasa ditulis dengan kurungan. Terdapat beberapa parameter di dalam kurungan, jika ia diperlukan.

Kaedah lain yang berguna  - val(s, v, ind) - kaedah untuk menyemak sama ada semua aksara rentetan ialah digit. s - rentetan sumber, v mengandungi nombor jika rentetan sumber ialah nombor dan 0 sebaliknya, ind mengandungi nombor < kuat> indeks s yang bukan digit, atau 0 jika s ialah nombor. s := 'ab1c' val(s, v, ind); writeln(v, ' ', ind); // 0 3 s := '123'; val(s, v, ind); w(vriteln, ' ', ind); // 123 0 Kaedah trim berguna - membolehkan anda mengalih keluar ruang pada permulaan dan penghujung rentetan s := ' ab 1c '; print('s=', trim(s)); // s=ab 1c

Problem

Kata laluan dipanggil kuat jika ia merangkumi kedua-dua huruf Latin huruf kecil dan huruf Latin huruf besar serta nombor, dan panjangnya mestilah sekurang-kurangnya 8 aksara.
Ia diperlukan untuk menentukan sama ada kata laluan ini kuat dari segi kriptografi.

Input

Satu baris dimasukkan, hanya terdiri daripada huruf Latin dan nombor. Bilangan aksara setiap baris tidak melebihi 100.

Output

Cetak perkataan YES jika kata laluan yang ditentukan adalah kuat dan TIDAK – sebaliknya (dalam huruf Latin besar).

Contoh
# Input Output
1 e TIDAK
2 AAAbbb123 YA