Viết chương trình Pascal tạo nhãn vở. *************************************************** * Truong: * * Lớp: * * Ten: * * Nam hoc: * ***************************************************

program ct;
uses crt;
var HoTen,Lop,Truong,NamHoc: string;
begin
    clrscr;
    writeln('Nhap truong:');readln(Truong);
    writeln('Nhap lop:');readln(Lop);
    writeln('Nhap Ho va Ten:');readln(HoTen);
    writeln('Nhap nam hoc:');readln(NamHoc);
    clrscr;
    writeln('*************************');
    writeln('Truong: ',Truong);
    writeln('Lop: ',Lop);
    writeln('Ho va ten: ',HoTen);
    writeln('Nam hoc: ',NamHoc);
    writeln('*************************');
    readln;
end.
___________________

#Duahauvn