Câu trả lời:
Program Xau;
Uses crt;
Var St: String;
i: longint;
Begin
Clrscr;
Write('Nhap xau: '); Readln(St);
For i:=1 to length(St) do
St[i] := Upcase(St[i]);
Write('St = ',St);
Readln
End.
Cập nhật ảnh bìa
Tải lên
Từ máy tính của bạn
Cập nhật ảnh đại diện
Tải lên
Từ máy tính của bạn
Học tại trường
Chưa có thông tin
Đến từ
Chưa có thông tin , Chưa có thông tin
Số lượng câu hỏi
1
Số lượng câu trả lời
1
Điểm GP
0
Điểm SP
0