In một bảng nhân của một số bất kỳ với các số từ 1 tới 10 và hiển thị kết quả. Với bài tập này, chúng ta chỉ sử dụng một vòng lặp và tăng dần giá trị của số nhân lên
2 câu trả lời
uses crt;
var i:longint;
begin
clrscr;
writeln('BANG CUU CHUONG 4');
for i := 1 to 10 do
writeln('4 x ',i,' = ',4*i);
readln;
end.
program sksk;
uses crt;
var i, s, n : integer;
begin
clrscr;
write('nhap bang nhan :');readln(n);
for i := 1 to 10 do
writeln(n,' x ', i ,' = ', i*n);
readln
end.
Câu hỏi trong lớp
Xem thêm
