Tin học Câu hỏi về ngôn ngữ lập trình pascal

[htb93]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

mình có một câu hỏi muốn hỏi tất cả các bạn
câu hỏi như sau
hãy viết chương trình nhập vào xâu a và kiểm tra xem có bao nhiêu từ trong xâu dc bắt đầu từ chữ T

 

[bupbexulanxang]

tìm vị trí T trong xâu a <đầu tiên>
dùng for i:=1 to n do

if a = ' ' and a[i+1] =' t '
thì đếm tăng lên nhé.

 

[skytech]

Viết CT nhập số m và n , kiểm tra xem 2 số đo có phải là số ae không. Biết m và n là 2 số ae nếu tổng các ước của m và n trừ 1 và chính nó bằng nhau .
VD:6 và 25 có tổng các ước trừ 1 và chính nó bằng 5