uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if (a[i] mod 2=0) and (a[i] mod 5=0) then t:=t+a[i];
write(t);
readln;
end.
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if (a[i] mod 2=0) and (a[i] mod 5=0) then t:=t+a[i];
write(t);
readln;
end.
Nhập vào từ bàn phím 1 dãy A gồm n số nguyên.Tính và đưa ra màn hình tổng của tất cả các số nguyên chia hết cho cả 2 và 5 có mặt trong dãy A
Đề bài 1:nhập 1 dãy số nguyên từ bàn phím,tách và hiển thị dãy các số âm và dãy các số dương,đưa ra màn hình câu trả lời dãy nào có nhiều phần tử hơn.
Đề bài 2:nhập 1 dãy số nguyên từ bàn phím,tìm kiếm phần tử có giá trị = giá trị m nhập từ bàn phím,phần tử đó có xuất hiện trong dãy số hay ko?
Dùng python nhé mn.Mn giúp e vs ::))
Python:Trung bình cộng Cho dãy gồm N số nguyên được nhập vào từ bàn phím và một số nguyên k. Yêu cầu: Cho biết trong dãy số đã cho có tồn tại hay không một cặp số mà trung bình cộng của chúng bằng k Kết quả đưa ra màn hình câu trả lời có tồn tại hay không tồn tại cặp số thoả mãn điều kiện Vd: N =4; k= 5 và dãy 0 2 6 4 => có tồn tại ((6+4)/2 =5=k) N=3; k=3 và dãy 1 2 3 => không tồn tại
Nhập vào số tự nhiên N từ bàn phím và đưa ra màn hình thông báo: g. N chia hết cho 3 hay không? h. Tổng các số chẵn trong đoạn [1;N]
Hãy lập trình nhập vào từ bàn phím 20 số nguyên không âm, tính và thông báo ra màn hình tổng các phần tử là số chẵn ở vị trí lẻ trong dãy 20 số đó.
VD:
input20vẽ sơ đồ khối tính tổng tất cả các số nguyên chia hết cho 3 trong phạm vi từ 1 đến N , với số N nguyên duyên lớn hơn 1 được nhập từ bàn phím
viết chuong trình nhập vào số nguyên dương n từ bàn phím. kiểm tra và thông báo ra màn hình số n vừa nhập có phải là số chẵn và chia hết cho 5 hay không
b1: nhập 1 dãy a từ bàn phím . tính tổng các giá trj của dãy a.
b2 : cho 2 xâu s1 và s2, viết đoạn chương trình chèn xâu s1 vào giữa s2, tại vị trí len(s2)\\2. in kết quả ra màn hình
b3: cho xâu s, viết đoạn lệnh trích ra xâu con của s bao gồm 3 ks tự đầu tiên của s
b4 ; viết chương trình kiểm tra xâu s có chứa chữ số không. thông báo " s có chứa chữ số" hoặc " s kh chứa chữ số nào "
help me, ty 3>
Phần tự luận
Viết thuật toán nhập vào từ bàn phím số nguyên dương N. Tính và đưa ra tổng:
a, Các số từ 1 đến N.
b. Các số lẻ từ 1 đến N
viết phương trình nhập một dãy số vào bàn phím . đếm các số dương trong dãy đã cho và ghi kết quả ra màn hình