Bài 12: Kiểu xâu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Võ Thị Thái Ngọc

nhập 1 xâu S từ bàn phím (s<25), đưa ra màn hình xâu St nhưng mỗi kí tự viết trên 1 dòng.

 Giúp e vs.

 

phạm quang huy
17 tháng 7 2021 lúc 9:51

program st;

ues crt;

var s:string;i:longint;

begin

 clrscr;

   write('nhap do dai cua xau');readln(s);

    if (s>=25)then

         begin 

             write('nhap lai s nho hon 25');readln(s);

          end;

   for i:=1 to length(s) do writeln(s[i]);

readln;

end. 


Các câu hỏi tương tự
Lan Anh
Xem chi tiết
Trâm Phạm
Xem chi tiết
Tiên Tiên
Xem chi tiết
Nguyen Ngoc Thien
Xem chi tiết
Hiếu
Xem chi tiết
Nguyễn thị tuyết nhung
Xem chi tiết
Nguyễn Taetruc
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Ngoc Huyen
Xem chi tiết