Thực hiện mỗi yêu cầu yêu cầu sau đây thành một hàm chức năng, sau đó viết chương trình chính gọi thực hiện các hàm này: a. Cho nhập 1 số nguyên dương n có giá trị trong khoảng từ 50 đến 100. Nếu nhập sai, yêu cầu nhập lại, ngược lại khi nhập đúng hàm trả về (return) n cho nơi gọi hàm. b. Hàm nhận tham số là số nguyên n. Hàm thực hiện tạo list L gồm n phần tử với giá trị được phát sinh ngẫu nhiên trong khoảng từ 0 đến 2*n. c. Hàm nhận tham số là list L. In ra các số nguyên tố có trong L. d. Hàm nhận tham số là list L. In ra các số chính phương có trong L. e. Hàm nhận tham số là list L. In ra các may mắn có trong L. f. Hàm nhận tham số là list L. Hàm thực hiện xóa các số nguyên tổ có trong L. g. Hàm nhận tham số là list L. Hàm thực hiện xóa các số chính phương có trong L. A Nhắc lại Số chính phương (square number hay perfect square) • Là số có căn bậc hai là một số nguyên. • Ví dụ 9 là số chính phương vì căn bậc hai của 9 là 3. Số nguyên tố là số tự nhiên lớn hơn 1 và chỉ có đúng hai ước số là 1 và chính nó. Số may mắn: là số chỉ chứa các ký số 6 hoặc 8.
1 câu trả lời
câu này mk chỉ lm đc câu a bc thôi bn nhé mong bn vote câu tl hay nhất
var a:array[0..10000] of longint;
n,i:longint;
function snt(m:longint):boolean;
var i:longint;
begin
if m<2 then exit(false)
else for i:=2 to m div 2 do
if m mod i=0 then exit(false);
exit(true);
end;
begin
repeat
read(n);
until (n>49) and (n<101);
for i:=1 to n do
a[i]:=random(n)*2;
for i:=1 to n do
write(a[i],' ');
writeln;
for i:=1 to n do
if snt(a[i]) then write(a[i],' ');
writeln;
readln;
readln;
end.
Câu hỏi trong lớp
Xem thêm