Viết chương trình đưa ra màn hình 10 dòng bảng cửu chương 5
2 câu trả lời
var i: byte;
Begin
For i:=1 to 10 do
Writeln('5 × ', i, ' = ', 5*i);
Readln
End.
program bang_5;
uses crt;
var i:byte;
begin
clrscr;
for i:=1 to 10 do
writeln('5 x ',i,' = ',5*i);
readln;
end.
