Em hiểu gì về đoạn chương trình sau
a) Var a array [1......10] of real;
b) Begin
Writeln ('Nhap day so thuc');
For i:=1 to 10 do
Begin
Write ('a[',i,']=');
Readln (a[i]);
End.
c) Writeln ('In day cac phan tu:');
For i:=1 to 10 do write (a[i]:5:2);Writeln;
d)For i:=10 downto 1 do write (a[i]:5:2);writeln;
e) S:=0;
For i:=1 to 10 do 'S:=S+a[i];
Write ('S='5:8:2);writeln;
Write...
Đọc tiếp
Em hiểu gì về đoạn chương trình sau
a) Var a array [1......10] of real;
b) Begin
Writeln ('Nhap day so thuc');
For i:=1 to 10 do
Begin
Write ('a[',i,']=');
Readln (a[i]);
End.
c) Writeln ('In day cac phan tu:');
For i:=1 to 10 do write (a[i]:5:2);Writeln;
d)For i:=10 downto 1 do write (a[i]:5:2);writeln;
e) S:=0;
For i:=1 to 10 do 'S:=S+a[i];
Write ('S='5:8:2);writeln;
Write ('S=',S/10:
