Câu hỏi:
13/07/2024 352Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Sách mới 2k7: 30 đề đánh giá năng lực DHQG Hà Nội, Tp. Hồ Chí Minh, BKHN 2025 mới nhất (600 trang - chỉ từ 140k).
Quảng cáo
Trả lời:
uses crt;
var a:array[1..100]of integer;
i,n,t,kt,j:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
writeln('Cac so vua nhap la: ');
for i:=1 to n do
write(a[i]:4);
writeln;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln('Tong cua day so la: ',t);
kt:=0;
for j:=2 to trunc(sqrt(t)) do
if t mod j=0 then
begin
kt:=1;
break;
end;
if kt=0 then writeln(t,' la so nguyen to')
else writeln(t,' khong la so nguyen to');
readln;
end.
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 1:
Viết một chương trình tính giai thừa của một số nguyên dương n. Với n được nhập từ bàn phím.
Định nghĩa giai thừa: giai thừa của 1 số là tích các số liên tiếp từ 1 đến số đó. Trường hợp đặc biệt, giai thừa của 0 và 1 là 1.
Ví dụ, n = 8 thì kết quả đầu ra phải là 1*2*3*4*5*6*7*8 = 40320.
Có 2 cách để viết chương trình tính giai thừa trong python:
· Tính giai thừa không sử dụng hàm đệ quy
· Tính giai thừa có sử dụng hàm đệ quy
Câu 5:
Mỗi mật khẩu máy tính gồm 6 kí tự, mỗi kí tự hoặc là một chữa cái hoặc là một chữ số và mật khẩu phải có ít nhất một chữ số. Hỏi lập được bao nhiêu mật khẩu?
về câu hỏi!