Giải bởi Vietjack
Lời giải:
uses crt;
var i, n, s, d : integer;
begin
clrscr;
write('nhap so n : ');readln(n);
s := 0; d := 0;
for i := 1 to n do
if i mod 2 <> 0 then
begin
s := s + i;
d := d + 1;
end;
writeln('tb = ', s / d);
readln
end.
Hãy cho biết cách :
+ Mở 1 bảng có tên HỌC_SINH trong CSDL
+ Xoá 1 bản ghi trong bảng HOC_SINH
+ Xắp xếp cột tên theo thứ tự giảm dần trong bảng HỌC SINH
