Viết chương trình nhập vào 1 xâu bất kì từ bàn phím. In xâu đó ra màn hình

0 bình luận về “Viết chương trình nhập vào 1 xâu bất kì từ bàn phím. In xâu đó ra màn hình”

1. uese crt;

   var t:string;

   begin

   clrscr;

   writeln(‘Nhap xau:’); readln(t);

   writeln(‘Xau vua nhap la:’);

   write(t);

   readln;

   end.

   Trả lời

2. program oken;
   uses crt;
   var s: string;
   begin
       clrscr;
       write(‘Nhap 1 xau: ‘); readln(s);
       writeln(‘xau vua nhap: ‘,s);
       readln;
   end.

   Trả lời