program luan;
uses crt;
var i: integer;
begin
clrscr;
P:=0;
for i:=0 to 49 do
P:= P+2i+1-2(i+1);
write('Ket qua phep tinh P la ',P);
readln
end.
Bài 1: Viết chương trình pascal thực hiện các yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên n b) In ra màn hình kết quả tổng các số nguyên từ 1 đến n (sử dụng câu lệnh lặp while...do) Bài 2: Viết chương trình pascal thực hiện câc yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên dương n b) In ra màn hình kết quả tổng các số lẻ từ 1 đến n (sử dụng câu lệnh lặp while...do giúp mình với mình đang cần gấp rất gấp luôn
Viết chương trình pascal nhập vào số nguyên n. Xuất kết quả ra màn hình ?
a) Các số nguyên liên tiếp từ 1 đến n ea màn hình?
b) Xuất các số nguyên tố có trong đoạn từ 1 đến n ra màn hình ?
Vd:
Nhap n=6
Cac so nguyen la
6 la hop so.
Vd:
Nhap n=11
Cac uoc cua n la : 1,11
11 la so nguyen to
Giúp mình với ạ, mình đang cần gấp
Viết chương trình nhập vào số nguyên dương n bất kỳ. Xuất ra trên màn hình kết quả tổng của dãy số sau: A = 1 + 2 + 3 + 4 + … + n Input: n = 5 Output: A = 15
viết chương trình tính tổng S= 1/3 + 1/5 + 1/7+....+1/(2n+1)
In kết quả ra màn hình. Với n là số nguyên dương được nhập vào từ bàn phím
hãy viết chương trình tính tổng các số từ 1 đến 7 in kết quả ra màn hình
Viết chương trình pascal sử dụng cấu trúc lặp để in ra màn hình tổng của 10 số tự nhiên đầu tiên
1. Viết chương trình nhập vào 1 số tự nhiên P. Tính và in ra màn hình các số lẻ và tổng các số lẻ từ 1 đến P. 2.Viết chương trình nhập vào 1 số tự nhiên N. Tính và in ra màn hình các số chẵn và tổng các số chẵn từ 1 đến N. 3. Viết chương trình nhập vào 1 số tự nhiên N. Tính tổng các số là ước của N. 4. Viết chương trình nhập vào 1 số tự nhiên N. Tính tổng các số là bội của 3 mà nhỏ hơn hoặc bằng N.
Viết chương trình nhập n là một số tự nhiên từ bàn phím , rồi tính 5n , rồi
in kết quả ra màn hình.
Hãy viết chương trình Pascal có sử dụng câu lệnh lặp
Yêu cầu:
hãy nhập vào từ bàn phím 6 số tự nhiên đầu tiên
hãy in ra màn hình các số chẵn trong 6 số tự nhiên trên
