uses crt;
var n,k,dem,d:word;
begin
write('nhap n:');readln(n);
dem:=0; k:=0;
while n>0 do begin
d:=n mod 10;
k:=k+d;
dem:=dem+1;
n:=n div 10;
end;
writeln('so chu so cua N la :',dem);
writeln('tong so chu so cua N la :',k);
readln;
end.
Đếm các cặp số trong dãy thỏa mãn điều kiện: tổng là số chẵn.
Dữ liệu vào: Đọc từ file văn bản BAI2.INP có cấu trúc như sau:
Dòng đầu tiên ghi giá trị n là độ dài của dãy số. (1<=n<=10000)
Dòng thứ 2 là n số của dãy số nguyên được viết cách nhau ít nhất một dấu cách.
Kết quả: Ghi ra file văn bản BAI2.OUT một số duy nhất là số cặp có tổng là số chẵn.
Cho hai biến a,b, có kiểu dữ liệu số nguyên. Em hãy viết chương trình Pascal thực hiện các yêu cầu sau: a) Khai báo hai biến a,b. b) Nhập giá trị của hai biến a,b từ bàn phím. c) In kết quả tổng của a,b ra màn hình.
Viết chương trình pascal nhập dãy số n (n nhập từ bàn phím) thực hiện
+ dòng 1 xuất ra màn hình dãy số vừa nhập
+ dòng 2 tổng của dãy số vừa nhập và xét tổng đó có phải là số nguyên tố không ?
+ dòng 3 các số ở vị trí lẻ của dãy số và tổng của nó. Xét tổng đó có phải là số chính phương không?
+ dòng 4 các số ở vị trí chẵn của dãy số và tổng của chúng. Xét tổng đó có phải là số hoàn hảo không ?
+ dòng 5 số lớn nhất và số nhỏ nhất của dãy số và tổng của hai số đó Giúp với !!
Cho hai biến a,b, có kiểu dữ liệu số nguyên.
Em hãy viết chương trình Pascal thực hiện các yêu cầu sau:
a) Khai báo hai biến a,b.
b) Nhập giá trị của hai biến a,b từ bàn phím.
c) In kết quả tổng của a,b ra màn hình.
CÓ BẠN NÀO GIỎI MÔN NÀY K Ạ GIÚP MIK VỚI MIK CẦN GẤP LẮM Ạ Cho hai biến a,b, có kiểu dữ liệu số nguyên. Em hãy viết chương trình Pascal thực hiện các yêu cầu sau: a) Khai báo hai biến a,b. b) Nhập giá trị của hai biến a,b từ bàn phím. c) In kết quả tổng của a,b ra màn hình.
Viết chương trình nhập vào một số nguyên N và thực hiện:
a. Số nguyên dương N có bao nhiêu chữ số?
b. Tính tổng các chữ số của N
c. In ra chữ số lớn nhất của N
*Yêu cầu: N là một số nguyên dương(N bé hơn hoặc bằng 109)
Khởi động phần mềm Turbo Pascal rồi viết chương trình nhận biết một số tự nhiên N được nhập vào từ bàn phím có phải số nguyên tố hay không? *Yêu cầu: 1) viết chương trình như trên 2) em hãy dịch và sửa lỗi chương trình(nếu có)
Nhập vào 2 số nguyên dương N,M tính tổng các số nguyên dương là ước ít nhất của 1 số trong đoạn từ n đến m Dữ liệu vào 9 12 Dữ liệu ra 63
