tính ca X ngũ N nữa .
các anh sem em làm có đúng không
program Test;
uses crt;
var i,n,t1,t2:integer;
t3,x:real;
begin
clrscr;
write(' nhap n'); realn(n);
for i:=0 to n do writeln(i);
for i:=1 to n do writeln(i);
t1:=t1+i;
writeln('tong cua cac so tu i toi n la :',t1)...