Em hãy viết ct máy tính bằng ngôn ngữ lập trình pascal để tính giá trị của 2^n (với n là số tự nhiên nhập từ bàn phím)
Biết rằng: 2^n=2*2*2...2
Giúp mình với
Những câu hỏi liên quan
Em hãy viết chương trình tính tổng các số chẵn nhỏ hơn số tự nhiên n. Với giá trị n nhập từ bàn phím. Viết bằng ngôn ngữ Python dùng mình nha
Viết chương trình bằng ngôn ngữ lập trình Pascal tính tổng các số từ 1 đến n, biết n là số tự nhiên được nhập từ bàn phím
Var i,n:integer;
s:longint;
Begin
Write('n = ');readln(n);
For i:=1 to n do
s:=s+i;
Write('Tong la ',s);
Readln;
End.
Đúng 2
Bình luận (0)
Viết chương trình bằng ngôn ngữ lập trình Pascal để nhập vào N số nguyên từ bàn phím, tính tổng của các số vừa nhập và in ra màn hình giá trị tổng.
Uses crt;
var n,i,x,u: integer;
begin clrscr;
readln(n);
for i:=1 to n do begin
readln(x);
u:=u+x;
end;
writeln(u);
readln;
end.
Đúng 2
Bình luận (0)
program TongCacSoNguyen;
var
N, i, soNguyen, tong: integer;
begin
// Nhập số lượng N
write('Nhap so luong N: ');
readln(N);
// Khởi tạo tổng
tong := 0;
// Nhập và tính tổng các số nguyên
for i := 1 to N do
begin
write('Nhap so nguyen thu ', i, ': ');
readln(soNguyen);
tong := tong + soNguyen;
end;
// In ra màn hình tổng
writeln('Tong cua cac so nguyen la: ', tong);
readln;
end.
Đúng 0
Bình luận (0)
NGÔN NGỮ C GIÚP MÌNH VỚI Ạ. 3.Viết chương trình tính tổng nghịch đảo của n số nguyên đầu tiên, theo công thức sau: S 1 + 1/2 + 1/3 + …+ 1/n 5.Viết chương trình nhập số nguyên dương n từ bàn phím, n10, tính và đưa ra màn hình giá trị n! 6.Viết chương trình tính và in tổng dưới đây ra màn hình: S 1 + 1/(2!) + 1/(3!) + .. + 1/(n!) với n được nhập từ bàn phím, 0n10. 8.Viết chương trình in ra các số nguyên tố từ 2 đến n, với n nhập từ bàn phím. 10.Nhập tử số và mẫu số của một phân số, in phân số đó...
Đọc tiếp
NGÔN NGỮ C GIÚP MÌNH VỚI Ạ. 3.Viết chương trình tính tổng nghịch đảo của n số nguyên đầu tiên, theo công thức sau: S = 1 + 1/2 + 1/3 + …+ 1/n 5.Viết chương trình nhập số nguyên dương n từ bàn phím, n<=10, tính và đưa ra màn hình giá trị n! 6.Viết chương trình tính và in tổng dưới đây ra màn hình: S = 1 + 1/(2!) + 1/(3!) + .. + 1/(n!) với n được nhập từ bàn phím, 0<n<10. 8.Viết chương trình in ra các số nguyên tố từ 2 đến n, với n nhập từ bàn phím. 10.Nhập tử số và mẫu số của một phân số, in phân số đó dưới dạng tối giản.
Viết chương trình bằng ngôn ngữ lập trình Pascal để nhập một số tự nhiên từ bàn phím và thông
báo ra màn hình kết quả số đã nhập là chẵn hay lẻ?
uses crt;
var n:longint;
begin
clrscr;
readln(n);
if n mod 2=0 then write('la so chan')
else write('la so le');
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trình in ra màn hình Dãy số từ 1 đến n bằng ngôn ngữ lập trình Pascal dùng lệnh lặp for..... do với n được nhập vào từ bàn phím
Var i,n:integer;
Begin
Write('n = ');readln(n);
Write('Day so tu 1 den ',n,' la ');
For i:=1 to n do write(i:8);
Readln
End.
Đúng 1
Bình luận (0)
2: Viết chương trình sử dụng lệnh lặp để tính trung bình cộng của N số thực. Với số N và các số tính trung bình cộng được nhập vào từ bàn phím. Câu 3: Viết chương trình nhận biết một số tự nhiên N được nhập từ bàn phím có phải là số nguyên tố hay không.
Câu 3:
uses crt;
var n,i,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
if n>1 then
begin
kt:=0;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if kt=0 then writeln(n,' la so nguyen to')
else writeln(n,' la hop so');
end
else writeln(n,' khong la so nguyen to cung khong la hop so');
readln;
end.
Đúng 1
Bình luận (1)
Viết chương trình Pascal, để nhập vào 2 số nguyên từ bàn phím. Tính tổng của 2 số đó. (mọi người giúp em làm trên pascal với)
Đọc tiếp
Viết chương trình Pascal, để nhập vào 2 số nguyên từ bàn phím. Tính tổng của 2 số đó.
(mọi người giúp em làm trên pascal với)
uses crt;
var a,b:int64;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
Đúng 0
Bình luận (0)
Bài tập 1: Em hãy viết chương trình cho bài toán sau bằng ngôn ngữ lập trình Pascal.
+ Nhập vào kích thước hai cạnh a, b của hình chữ nhật từ bàn phím.
+ Gán cho biến P(chu vi hình chữ nhật) giá trị là (a + b)* 2.
+ Gán cho biến S(Diện tích hình chữ nhật) giá trị là a*b.
+ Hiển thị lên mà hình thông báo
“ Gia tri cua P, Gia tri cua S”
Var a,b,s,p:real;
Begin
Write('a = ');readln(a);
Write('b = ');readln(b);
p:=(a + b)*2;
s:=a*b;
Write('P = ',p:10:2,' va s = ',s:10:2);
Readln;
End.
Đúng 0
Bình luận (0)