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
24 tháng 10 2018
var
n,k,d,i,s:integer;
begin
write(' nhap n: ');
readln(n);
for i:= 1 to n do
begin
write('a[',i,']=');
readln(a[i]);
end;
for i:= 1 to n do
if k = a[i] then d:=d+1;
writeln(k,' xuat hien ',d,' lan trong mang ');
for i:= 1 to n do
if a[i] mod 2 = 0 then s:= s+a[i];
write(' tong so chan trong mang la :',s);
readln;
end.
CHÚC BẠN HỌC TỐT :D
24 tháng 10 2018
ôi chết dưới phần nhập n bạn thêm :
write(' nhap k: ');
readln(k);
CHO mình nha
22 tháng 12 2019
*Xác định bài toán
-input: số n
-output: tính tổng \(S=\frac{1}{1}+\frac{1}{2}+\frac{1}{3}+...+\frac{1}{n}\)
*Mô tả thuật toán
-Bước 1: nhập n
-Bước 2: s:=0; i:=1;
-Bước 3: s:=s+1/i;
-Bước 4: inc(i);
-Bước 5: nếu i<=n thì quay lại bước 3
-Bước 6: Xuất s
-Bước 7: Kết thúc
DT
1
22 tháng 10 2020
Bước 1: Nhập n
Bước 2: s←0; i←1
Bước 3: gt←1; j←1
Bước 4: gt←gt*j; j←j+1;
Bước 5: s←s+1/gt;
Bước 6: Nếu j≤i thì quay lại bước 3
Bước 7: Nếu i≤n thì quay lại bước 2
Bước 8: Xuất s
Bước 9: Kết thúc
25 tháng 12 2019
Đang bận thi học kỳ nên không có làm được.
Btw câu 9,10 m có thể search gg :))
Không cần viết chương trình đâu chứ ha :3
= 12345678