viết chương trình nhập cân nặng cho 20 học sinh .In ra màn hình

0 bình luận về “viết chương trình nhập cân nặng cho 20 học sinh .In ra màn hình”

1. Uses crt;

   Var can_nang:Real;

   Begin clrscr;

   Write (‘Nhap can nang là ‘); Readln( cần nang)

   For i :=1 to 20 do writeln (‘can nang) ;

   Readln ;

   End.

   Bình luận

2. Uses crt;

   Var can_nang:Real;

   Begin clrscr;

   Write (‘Nhap can nang là ‘); Readln( cần nang)

   For i :=1 to 20 do writeln (‘can nang) ;

   Readln ;

   End.

   Bình luận