Tích một số chẵn các số lẽ là một số chẵn hay số lẽ ?
Tích một số lẽ các số lẽ là một số chẵn hay số lẽ ?
Nhập một số từ bàn phím, in ra kết quả đó là số chẵn hay số lẽ
Program HOC24;
var x: integer;
begin
write('Nhap so: '); readln(x);
if x mod 2=0 then write('La so chan') else write('La so le');
readln;
end.
Mình đang gặp một bài toán chứng minh biểu thức là số chính phương mình đã biến độ sao cho (m+n)(m-n)=5 thì nó bảo xét chẳng hay lẽ gì đó
Mình xem một bài khác thì nó bảo xét tính chẳn lẽ và thấy ăn x lẽ và đặt số x=2n +1
Cho mình hỏi xét tính chẵn lẻ ra sao và dạng cơ bản của số chẵn lẻ
Viết lưu đồ kiểm tra a là số chẵn hay số lẽ
Uses crt;
Var x:integer;
Begin
Write('Nhap vao mot so nguyen : ');
Readln(x);
If x MOD 2=0 Then
Writeln('So vua nhap vao la so chan')
Else
Writeln('So vua nhap vao la so le');
Readln;
End.
chứng tỏ rằng tổng của hai số lẽ là một số chẵn
ta viết hai số lẻ đó dưới dạng như sau :
2k+1
thì theo đề ra ta có tổng :
(2k+1)+(2k+1)= 4k +2
phân tích :
4k là số chẵn
2 là số chẵn
\(\Rightarrow\) 4k +2 là số chẵn
viết chương trình nhập vào số nguyên dương N.Kiểm tra và in ra màn số N là số chẵn hay lẽ
Sử dụng lệnh lặp while...do để viết chương trinhfkieemr tra một số ngueyen nhập từ bàn phím số đó là chẵn hay số lẽ
Bài này không dùng while do được
uses crt;
var a:integer;
begin
clrscr;
write('Nhap a='); readln(a);
if a mod 2=0 then writeln(a,' la so chan')
else writeln(a,' la so le');
readln;
end.
viết trình nhập vào dãy số nguyên n phân tử) tính tổng các số lẽ) tính tích cac s số chẵn
#include <bits/stdc++.h>
using namespace std;
long long a[1000],i,n,t1,t2;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
t1=0;
t2=1;
for (i=1; i<=n; i++)
{
if (a[i]%2!=0) t1+=a[i];
else t2*=a[i];
}
cout<<t1<<endl;
cout<<t2<<endl;
return 0;
}
Nhập vào một dãy số nguyên gồm n phần tử. Viết chương trình In ra màn hình tổng các số lẽ, số chẵn của dãy?
Var a:array[1..1000] of integer;
i,n:integer;
sc,sl:longint;
Begin
Write('Nhap so luong so cua day ');readln(n);
For i:=1 to n do
Begin
Write(a,'[',i,'] = ');readln(a[i]);
End;
Write('Tong cac so chan la ');
For i:=1 to n do
If a[i] mod 2 = 0 then sc:=sc+a[i];
Writeln(sc);
Write('Tong cac so le la ');
For i:=1 to n do
If a[i] mod 2 <> 0 then sl:=sl+a[i];
Write(sl);
Readln
End.