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
program Tinh_tong;
uses crt;
var i, n, s: integer;
begin clrscr;
writeln('Chuong trinh tinh tong S = 1 + 2 + ... + n');
write('Nhap so n: ');read(n); s:=0;
for i := 1 to n do s := s + i;
writeln('Tong cua ',n,' so tu nhien dau tien s = ',s);
readln;
readln;
end.
* Dựa vào vòng lặp for viết chương trình tính tổng n số tự nhiên bằng vòng lặp while
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
cho 2 số m và n là bạn của nhau nếu tổng các ước của m=n và ngược lại. tìm tất cả các so là bạn của nhau nhỏ hơn 10001 (viết chương trình pascal).
Viết chương trình pascal in kết quả của P ra màn hình :
P=1-2+3-4+5-6+....+99-100
Câu 1: Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của 1 dãy số. Độ dài của dãy cũng được nhập từ bàn phím
CT mẫu:
uses crt;
var n,i:integer;
a:array[1..100] of integer;
Begin
clrscr;
write('nhap so phan tu cua day:'); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
writeln('day so da nhap:');
for i:=1 to n do write(a[i]:2);
readln;
end.
giúp mình với mình cảm ơn trước
Câu 1: Viết chương trình nhập 10 số nguyên N và tính tổng các số đó
Câu 2: Viết chương trình nhập 10 số nguyên N và in ra màn hình số lượng các số chẳn đã nhập được
Câu 3: Viết chương trình nhập 2 số M, N (M nhỏ hơn N) in ra màn hình các số lẻ có trong khoảng từ M đến N
Các bạn ai đó giúp mình làm những bài này nhé. Cảm ơn!
Câu 1: Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n (với n được nhập từ bàn phím, n là số nguyên dương).
Câu 2: Viết chương trình in ra tổng các số lẻ nhỏ hơn hoặc bằng n (Với n được nhập từ bàn phím)
Câu 3: Viết chương trình in ra tất cả các ước của một số n (Với n được nhập từ bàn phím)
Câu 4: Viết chương trình in bảng cửu chương n (Với n được nhập từ bàn phím)