viết chương trình nhập cân nặng cho 20 học sinh .In ra màn hình
2 câu trả lời
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.
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.