K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

22 tháng 3 2023

a = int(input("Nhập chiều dài: "))

b = int(input("Nhập chiều rộng: "))

chu_vi = 2*(a+b)

dien_tich = a*b

print(f"Chu vi hình chữ nhật là: {chu_vi}")

print(f"Diện tích hình chữ nhật là: {dien_tich}")

26 tháng 4 2023

program TongSoChan;

var
  n, i, x, tong: integer;

begin
  write('Nhap so nguyen n: ');
  readln(n);
  
  tong := 0;
  
  for i := 1 to n do
  begin
    read(x);
    if x mod 2 = 0 then
      tong := tong + x;
  end;
  
  writeln('Tong cac so chan la: ', tong);
  readln; 
end.

7 tháng 2 2023

 

19 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

if (i%2==0) t=t+i;

cout<<t;

return 0;

}

14 tháng 3 2023

n = int(input())
if n % 2 != 0:
    n -= 1
so_so_hang = (n - 2) // 2 + 1
print((n + 2)*so_so_hang // 2)

6 tháng 4 2023

# Dãy số thứ nhất

list1 = list(map(int, input("Nhập dãy số thứ nhất, cách nhau bằng khoảng trắng: ").split()))

so_chan1 = 0

so_le1 = 0

for num in list1:

     if num % 2 == 0:

          so_chan1 += 1

     else:

          so_le1 += 1

print("Trong dãy số thứ nhất có", so_chan1, "số chẵn và", so_le1, "số lẻ.")

# Dãy số thứ hai

list2 = list(map(int, input("Nhập dãy số thứ hai, cách nhau bằng khoảng trắng: ").split()))

so_chan2 = 0

so_le2 = 0

for num in list2:

     if num % 2 == 0:

          so_chan2 += 1

     else:

          so_le2 += 1

print("Trong dãy số thứ hai có", so_chan2, "số chẵn và", so_le2, "số lẻ.")

7 tháng 3 2023

n = int(input("Nhập vào số tự nhiên n: "))

count = 0

for i in range(2, n+1):

      if i % 3 == 0:

            count += 1

print("Số lượng số chẵn chia hết cho 3 trong đoạn từ 2 đến n là:", count)

   
D
datcoder
Giáo viên
17 tháng 10 2023

Program HOC24;

uses crt;

var i,n: integer;

a: array[1..1000] of integer;

t: longint;

begin

clrscr;

readln(n); 

t:=0;

for i:=1 to n do

begin

read(a[i]);

if (a[i] mod 2=0) and (a[i] mod 5=0) then t:=t+a[i];

end;

readln;

write(t);

readln;

end.