Trần Đỗ Tú
11/05/2009
| Số câu hỏi | 0 |
| Số câu trả lời | 1 |
| Điểm | 17 |
| Kết bạn | |
Bạn bè (0)
Hoạt động gần đây (1)
-
Trần Đỗ Tú đã trả lời trong câu hỏi: Viết chương trình in ra màn hình tam giác Pascal? Cách đây 3 năm
program Tam_giac_pascal;
uses crt;
var n,i,j:integer;
m:array[1..100] of integer;
begin
write('n:=');readln(n);
for i:=1 to n do m[i]:=0;
m[1]:=1;
for i:=1 to n do
begin
for j:=i+1 downto 2 do m[j]:=m[j]+m[j-1];
for j:=1 to i+1 do write(m[j]:3);
writeln;
end;
readln
end.
Điểm thưởng gần đây (1)
-
Trần Đỗ Tú: Login đăng nhập hàng ngày (+2đ) Cách đây 3 năm
