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

DN

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

NT
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
PD
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ự
CD
Xem chi tiết
NN
Xem chi tiết
LD
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
NH
Xem chi tiết
TA
Xem chi tiết
KC
Xem chi tiết
H24
Xem chi tiết