Block2Pascal Pro

Team Nhật Minh 2026 • Ver 1.0

main.pas (Pascal)

Live Sync

Free Pascal UTF-8

Ready

Thông báo hệ thống

1 1 1000 White Black 440 KieuSet S TapHop 1, 2, 3 1, 2, 3 1 0 ADD 1 1 10 3 10 3 0 5 x x Xin chao x 0 0 x 1 i 1 10 i 10 1 x 10 x 10 100 100 KieuXau 255 s 255 s abc s 1 s 1 s s s 1 3 a s s 1 1 new s 1 123 s s n err KieuMang1D 1 10 A 1 10 MaTran 1 10 1 10 M 1 10 1 10 A 1 A 1 0 M 1 1 M 1 1 0 SinhVien sv HoTen sv HoTen sv Diem 10 sv tong x, y: integer tong s tong 4, 5 inso n: integer inso 6