Program HOC24;
var i,j: byte;
begin
for i:=1 to 3 do
begin
for j:=1 to 7 do write('*');
writeln;
end;
readln
end.
Đúng 0
Bình luận (0)
Bài 7. Câu lênh lặp
Các câu hỏi tương tự
[ Em hãy viết đoạn chương trình sử dụng vòng lặp For...do để in ra màn hình 10 chữ O ]
Bạn nào giúp mik đc ko, mai mik thi rồi
Viết chương trình nhập vào từ bàn phím bảng cửu chương 2 ( sử dụng lệnh lặp for to do ) anh giúp em ạ
Xem chi tiết
[ Em hãy viết đoạn chương trình sử dụng vòng lặp For...do để in ra màn hình các số từ 1 đến 10 ]
giúp mik ik mai mik thi gk 2 r
GIÚP EM MN ƠI, MAI EM NỘP R Ạ T-T.
Xoá sạch màn hình kết quả, sử dụng vòng lặp While . do hoặc For..do viết chương trình tính tổng sau: S=1/1*2+1/2*3+1/3*4+.....+1/n*(n+1)
N nhập từ bàn phím
Sử dụng vòng lặp for...do em hãy viết chương trình xuất ra màn hình cửu chương 4 (nâng cấp: chỉ cần nhập cửu chương 1 đến 9 sẽ ra cửu chương đó)
ai giải thích giúp mình câu này với ạgiả sử x, i là hai biến kiểu integer. Xét đoạn chương trình saux:2; For i:1 to 6 do if i mod 30 then x:x*i else x:x+i; Writeln (x);Đoạn chương trình trên sẽ in ra màn hình giá trị của x là
Đọc tiếp
ai giải thích giúp mình câu này với ạ
giả sử x, i là hai biến kiểu integer. Xét đoạn chương trình sau
x:=2; For i:=1 to 6 do if i mod 3=0 then x:=x*i else x:=x+i; Writeln (x);
Đoạn chương trình trên sẽ in ra màn hình giá trị của x là
Sử dụng câu lệnh lặp For...do để viết chương trình nhập tên và hiển thị ra màn hình lời chào cho 20 bạn trong lớp em.
10 tháng 3 2022 lúc 14:27
Hãy viết chương trình Pascal tính tổng của 100 số tự nhiên liên tiếp.
Yêu cầu: Viết 2 chương trình sử dụng 2 dạng câu lệnh for...do và while...do
Viết chương trình tính tích các số chẳn và lớn hơn 10 từ 1 đến n. Với n được nhập từ bàn phím, rồi in kết quả ra màn hình
cách 1: sử dụng lệnh for do
cách 2: sử dụng lệnh while do