Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hoa Ngô Bùi Mai

Em hãy viết chương trình cho biết số từ của đoạn dài nhất liên tiếp các từ
có cùng độ dài của một đoạn văn bản cho trước.

uses crt;
var s:string; a:array[1..1000]of longint;
    i,t,n,max,j:longint;
begin
  clrscr;
  write('s=');
  readln(s);
  n:=length(s);
  t:=1;
  For i:=1 to n do
    If(s[i]<>' ')or(i=1)then
    a[t]:=a[t]+1 else inc(t);
  for i:=1 to t do
    begin
      j:=i;
      while a[j]=a[i] do inc(j);
      If j-i>max then max:=j-i;
    end;
  writeln(max);
 readln
end.

đây là bài cô mk chữa mà mk chưa hiểu lắm giải nghĩa giúp mk với ạ


Các câu hỏi tương tự
Phú Nhuận Nguyễn
Xem chi tiết
Nguyễn Yến  Linh
Xem chi tiết
Nguyễn Thái Phương Thảo
Xem chi tiết
Linh Nguyễn Gia
Xem chi tiết
•๖ۣۜNHa•
Xem chi tiết
Nguyễn Thái Phương Thảo
Xem chi tiết
Phú Nhuận Nguyễn
Xem chi tiết
Bình Phan
Xem chi tiết
Phước Nguyễn
Xem chi tiết