K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
NB
30 tháng 4 2023
Câu lệnh ghép sẽ được thực hiện 981 lần, từ giá trị 1000 giảm xuống dần cho đến giá trị 20
LA
28 tháng 6 2018
Lập chương trình Pascal để in bảng cửu chương ra màn hình.
Var
a:array[1..9,1..9] of Integer ;
i,j:byte ;
BEGIN
Clrscr ;
For i := 1 to 9 do
For j := 1 to 9 do
A[i,j] := i*j ;
For i := 1 to 9 do
Begin
For j := 1 to 9 do Write(a[i,j]:5);
Writeln ;
Writeln ;
End ;
Readln ;
END.
25 tháng 4 2021
*Câu lệnh For..do
Dạng xuôi: for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
25 tháng 4 2021
*Câu lệnh For..do
Dạng ngược: For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> do <câu lệnh>;
LS
3 tháng 12 2021
Dựa vào thuật toán sau viết chương trình đó b, xin lỗi mình kh ghi rõ
2 tháng 3 2020
thêm câu này nữa mn ạ:
Câu lệnh For i:= 3 to 10 do begin write(i); end; khi thực hiện xong sẽ viết ra số 13 7 10 142 tháng 3 2020
câu cuối ạ Cho câu lệnh sau: s:=0; For i:=1 to 5 do if i mod 2 = 0 then s:=s+i else s:= s+i; cho biết kết quả s ?