Program HOC24;
var x,a,b: integer;
y: longint;
begiin
write('Nhap a;x;b : '); readln(a,x,b);
y:=a*x+b;
if y mod 2=0 then write('y la so le ') else write('y la so chan');
readln
end.
Viết chương trình kiểm tra số nguyên N bất kỳ nhập vào từ bàn phím là số âm hay số dương.
Viết chương trình nhập vào mảng A gồm N phần tử (N<= 500) từ bàn phím giá trị các phần tử là các số nguyên đưa ra màn hình mảng vừa nhập với thứ tự các phần tử ngược lại, nhập 3, 6, 8 đưa ra 8, 6, 3. Đếm số phần tử có giá trị lớn hơn 10. Đưa ra màn hình số lượng số nguyên tố trong mảng
1.viết chương trình nhập vào mảng A gồm N phần tử (N<= 500) từ bàn phím. Sau đó, tính tổng các phần tử âm chia hết cho cho 7
2.viết chương trình nhập vào mảng C gồm 10 phần tử từ bàn phím. Sau đó xuất ra các phần tử là số nguyên tố
3.viết chương trình tạo nhập vào mảng D gồm K phần tử (K<= 200) từ bàn phím. Sau đó cho biết có bao nhiêu phần tử chẵn có 2 chữ số
mn giúp em giải với ạ
viết chg trình nhập từ bàn phím số nguyên dương N hãy tính và đưa ra màn hình tổng các số chia hết cho 3 trong đoạn từ 1 đến N
Hãy viết chương trình tìm giá trị của N thỏa mãn biểu thức sau:
1+ \(\dfrac{1}{2}\)+\(\dfrac{1}{3}\)+...+\(\dfrac{1}{N}\) >a
Biết a được nhập từ bàn phím.
Giúp mình với.
Viết chương trình tính tổng dãy số nhập từ bàn phím sao cho không vượt qua 200
1) dùng lệnh lặp While...do đếm các số nguyên tố từ 1 đến n (n là số nhập từ bàn phím)
2) dùng lệnh lặp While...do để tính tổng các số nguyên tố được nhập tuè bàn phím.
mn giải hộ mình với ạ. mình xin cảm ơn ạ
1. Viết chương trình nhập vào môg số nguyên N và kiểm tra xem số đó là số âm hay số dương
2. Viết chương trình tính tổng các số lẻ từ 1->20 sau đó xuất tổng vừa tính được
Lập tính tính tổng :
Nhập số nguyên N vào từ bàn phím . Tính tổng các chữ số của N .
