Question

Bài 1: viết chương tình tính tích 10 số tự nhiên đầu tiên.( Tuỳ theo các em su dung
for..to..do hay while..do)
Bài 2:viết chương trình đưa ra màn hình các kí tự trong bảng chữ cái từ A-> Z.

P/s : hôm nay em nộp rồi mọi người giúp em với :((

Answer 1

Bài 1:

Program hotrotinhoc_hoc24;

var i,t: integer;

begin

t:=1;

for i:=1 to 10 do t:=t*i;

write('Tich 10 so tu nhien dau tien la: ',t);

readln

end.

Answer 2

Bài 2:

Program hotrotinhoc_hoc24;

var i: char;

begin

write('Cac ki tu trong bang chu cai tu A den Z la : ');

for i:='A' to 'Z' do write(i,' ');

readln

end.