Viết chương trình in ra bảng cửu chương của số N trong khoảng từ 1 đến 9, số được nhập từ bàn phím

2 câu trả lời

Program hoidap;
Uses crt;
Var N,i : integer;
Begin
Clrscr;
Write(‘Nhap so N=’); readln(N);
Writeln;
Writeln(‘Bang nhan’,N);
Writeln;
For i:=1 to 10 do writeln(N,’ x ‘,i:2,’=’,N*i:3);
Readln
End.

program oken;
uses crt;
var i,n:integer;
begin
        clrscr;
        write('nhap 1 so bat ky: '); readln(n);
        writeln('BANG CUU CHUONG ',n);
        for i:=1 to 9 do
                writeln(n,' * ',i,' = ',n*i);
        readln;
end.

Câu hỏi trong lớp Xem thêm