năm 2019 đến năm 2020 trường trung học phổ thông Xuân Thọ có tổng cộng n thí sinh tham gia kỳ thi tốt nghiệp với danh sách đã được phê duyệt bắt đầu từ a1, a2,
năm 2019 đến năm 2020 trường trung học phổ thông Xuân Thọ có tổng cộng n thí sinh tham gia kỳ thi tốt nghiệp với danh sách đã được phê duyệt bắt đầu từ a1, a2,..... An thí sinh đăng ký dự thi. Gồm 4 môn thi trong đó có 3 môn bắt buộc: toán, Văn, Anh và một môn tự chọn điểm xét tuyển tốt nghiệp được tính bởi công thức điểm xét TN bằng (( tổng điểm 4 bài thi)+(điểm khuyến khích/4)+điểm trung bình lớp 12)/2 Em hãy thực hiện yêu cầu sau a) xác định input và output để giải bài toán từ câu b. b) viết thuật toán để in ra danh sách những học sinh ông tốt nghiệp với điều kiện điểm xét TN=5 và không có môn nào
Lời giải 1 :
uses crt;
var m: array[1..100] of integer;
n,i,max,j,t,scp: integer;
begin
clrscr;
write ('nhap n: '); readln (n);
for i:=1 to n do
begin
write ('nhap m[',i,']: '); readln (m[i]);
if max<=abs(m[i]) then max:=abs(m[i]);
end;
for i:=1 to n-1 do
for j:=i+1 to n do
if m[i]<m[j] then
begin
t:=m[i];
m[i]:=m[j];
m[j]:=t;
end;
write ('day sau khi sap xep giam dan: ');
for i:=1 to n do write (m[i],' ');
writeln;
writeln ('gia tri tuyet doi lon nhat trong day: ',max);
write ('cac so chinh phuong trong day: ');
for i:=1 to n do
begin
scp:=trunc(sqrt(m[i]));
if sqr(scp)=m[i] then
write (m[i],' ');
end;
readln;
end.
Thảo luận
Có thể bạn quan tâm
Bạn có biết?
Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.
Nguồn : Wikipedia - Bách khoa toàn thưTâm sự 10
Lớp 10 - Năm thứ nhất ở cấp trung học phổ thông, năm đầu tiên nên có nhiều bạn bè mới đến từ những nơi xa hơn vì ngôi trường mới lại mỗi lúc lại xa nhà mình hơn. Được biết bên ngoài kia là một thế giới mới to và nhiều điều thú vị, một trang mới đang chò đợi chúng ta.
Nguồn : ADMIN :))Xem thêm tại https://loigiaisgk.com/cau-hoi or https://giaibtsgk.com/cau-hoi
Copyright © 2021 HOCTAPSGK