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.
a)Xác định số học sinh trong lớp cùng mang họ trần.
- Input: Họ tên học sinh .
- Output: Số học sinh mang họ trần.
b) Tính tổng của các phần tử lớn hơn 0 trong dãy n số cho trước.
- Input: Các phần tử lớn hơn 0 trong dãy n.
- Output: Tổng của các phần tử trong dãy n.
c) Tìm số các số có giá trị nhỏ nhất trong n số đã cho.
- Input: Các số trong dãy n số đã cho.
- Output: Số có trá trị nhỏ nhất trong dãy n số
INPUT: Danh sách số học sinh trong lớp.
OUTPUT: Số học sinh trong lớp mang họ Trần.
b) INPUT: Dãy gồm n số.
OUTPUT: Tổng các phần tử lớn hơn 0.
c) INPUT: Cho n số.
OUTPUT: Số các số có giá trị nhỏ nhất trong n số.
Lời giải:
program hotrotinhoc;
var a: array[1..32000] of integer;
i,n: integer;
function dem(x: integer): integer;
var d,j: integer;
begin
d:=0;
for j:=1 to x do if x mod j=0 then inc(d);
dem:=d;
end;
begin
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
max:=0;
for i:=1 to n do
if u(a[i])>u(max) then max:=a[i];
write(max);
readln
end.
1
*Xác định bài toán
-input: a,b
-output: ucln(a,b);
*Xây dựng thuật toán
-Bước 1: nhập a,b
-Bước 2: nếu a>b thì a:=a-b
-Bước 3: ngược lại thì b:=b-a
-Bước 4: Nếu a<>b thì quay lại bước 2
-Bước 5: ucln:=a;
-Bước 6: Xuất ucln
-Bước 7: Kết thúc
2:
*Xác định bài toán
-input: a,b
-output: bcnn(a,b);
*Xây dựng thuật toán
-Bước 1: nhập a,b
-Bước 2: nếu a>b thì a:=a-b
-Bước 3: ngược lại thì b:=b-a
-Bước 4: Nếu a<>b thì quay lại bước 2
-Bước 5: ucln:=a;
-Bước 6: bcnn:=(a*b)/ucln;
-Bước 7: xuất bcnn
-Bước 8: Kết thúc
def UCLN(a, b):
if a == 0:
return b
elif b == 0:
return a
elif a == b:
return a
elif a > b:
return UCLN(a - b, b)
else:
return UCLN(a, b - a)