5x1=5 

5x2=10

5x3=15

5x4=20 

5x5=25

5x6=30

5x7=35

5x8= 40

5x9=45

5x10=50

tick mik nha

Program HOC24;

var n,i: integer;

begin

write('Nhap so nguyen: '); readln(n);

for i:=1 to 10 do

writeln(n,' x ',i,' = ',n*i);

readln

end.

uses crt;

var n,i:integer;

begin

clrscr;

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

for i:=1 to 10 do

writeln(n,'*',i,'=',n*i);

readln;

end.

Program bangCuuChuong9;

uses crt;

var i, n: integer;

begin

clrscr;

n:=9;

for i:=1 to 10 do

begin

writeln('9x',i,'=',n*i);

end;

readln;

end.

ê mi phải lớp 7a2 khống

ừ ừ có j ák

t có nhìu nik lắm !!!!!!!

lam on giup minh voi thu nam minh kiem tra roi

bảng cửu chương 2 hả bạn ?

Sử dụng For...do

Chương trình tinhtong;

trong đó n, t: số nguyên;

s: thật;

bắt đầu

write('Nhập số n');readln(n);

s: = 0;

Đối với t: = 1 đến n làm s: = s + 1 / t;

writeln('Tổng s là',s);

readln

kết thúc.

Sử dụng While...do

Chương trình tinhtong;

trong đó n, t: số nguyên;

s: thật;

bắt đầu

write('Nhập số n');readln(n);

s: = 0; t: = 1;

Câu 2:Trong khi t <= n làm

bắt đầu t: = t + 1;

s: = s + 1 / t kết thúc;

writeln('Tổng s là',s);

readln

kết thúc.