K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
NT
1
11 tháng 5 2017
Program tính_chia;
Uses crt;
Var i, n, s, a: integer;
Begin
Write('Nhap so n: '); readln(n);
s:=1;
For i:=1 to n do s:=s*i;
a:=0;
For i:=1 to n do a:=a+i;
Writeln('Ket qua phep tinh chia bang: ', s/a :10:2);
readln;
End.
Các bạn giúp mình với 
NT
1
NT
2
11 tháng 5 2017
Program luy_thua;
Uses crt;
Var a, i, n: integer;
Begin
Write('Nhap co so a: '); readln(a);
Write('Nhap so mu n: '); readln(n);
For i:=1 to n do a:=a*a;
Writeln('Gia tri a luy thua n la: ', a);
Readln;
End.
TT
mình đang cần gấp
6
25 tháng 9 2016
begin
writeln('*****');
writeln('*****');
writeln('*****');
writeln('*****');
writeln('*****');
readin
end.
trắc nghiệm nè
1d,2a,3a,4d,5d,6d
c1 tự l tìm là ra l
hoạt động phụ thuộc vào điều kiện là việc điều chỉnh hành động tùy theo hoàn cảnh cụ thể,khi thục hiện chương trình máy sẽ kiểm tra điều kiện đúng thì thực hiện câu lệnh còn nếu điều kiện sai thì bỏ qua câu lệnh
c1
a) x=6
b)x=10
c)x=5
d)x=15
tự luận ấy