Viết chương trình đọc vào ba chuối ký tự trên ba dòng. Ghép chúng lại trên cùng một dòng và cách nhau một khoảng trắng. ( STRING )
2 câu trả lời
uses crt;
var s,st,str:string;
begin
clrscr;
readln(s);
readln(st);
readln(str);
write(s,' ',st,' ',str);
readln;
end.
Program FNG;
Uses crt;
Var St1, St2, St3:String;
Begin
Clrscr;
Write('Nhap St1: '); Readln(St1);
Write('Nhap St2: '); Readln(St2);
Write('Nhap St3: '); Readln(St3);
Write(St1,' ',St2,' ',St3);
Readln
End.