Bài 7. Câu lênh lặp

duy nguyễn

in bảng cửu chương 2n (với n nhập từ bàn phím)

Nguyễn Lê Phước Thịnh
29 tháng 3 2020 lúc 21:50

uses crt;

var n,i,d:integer;

begin

clrscr;

write('n='); readln(n);

d:=2*n;

for i:=1 to 10 do

writeln(d*i,' ');

readln;

end.

Bình luận (0)
 Khách vãng lai đã xóa
Phan Tiến Đạt
30 tháng 3 2020 lúc 10:06

uses crt;
var n,x,i:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
x:= 2 * n;
for i:= 1 to 10 do
writeln(x,' x ',i,' = ',x * i);
readln
end.

Bình luận (0)
 Khách vãng lai đã xóa

Các câu hỏi tương tự
Công danh
Xem chi tiết
nguyễn bảo nga
Xem chi tiết
Lâm Khả Doanh
Xem chi tiết
hoangvinh
Xem chi tiết
Nguyenthanh
Xem chi tiết
Nguyễn Gia Huy
Xem chi tiết
Thúy Anh
Xem chi tiết
Kim Chi
Xem chi tiết
DinoDrang
Xem chi tiết