Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Hoàng lĩnh
Xem chi tiết
Kiều Vũ Linh
20 tháng 3 2023 lúc 12:20

Var i,n:integer;

s:longint;

Begin

Write('n = ');readln(n);

For i:=1 to n-1 do

If (i mod 2 = 0) and (i mod 3 = 0) then

s:=s + i;

Write('Tong la ',s);

Readln;

End.

Lăng Kỳ Khả
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 1 2022 lúc 13:53

#include <bits/stdc++.h>

using namespace std;

long long s,i,n;

int main()

{

cin>>n;

s=0;

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

if (i%3==0) s=s+i;

cout<<s;

return 0;

}

Mai Xuân Phúc
Xem chi tiết
Phan Thị Ka
Xem chi tiết
Minh Lệ
19 tháng 3 2023 lúc 22:40

Câu 1:

Program HOC24;

var i,p: integer;

t: longint;

begin

write('Nhap P: '); readln(p);

t:=0;

for i:=1 to p do if i mod 2<>0 then t:=t+i;

write('Tong cac so le la: ',t);

readln

end.

Minh Lệ
19 tháng 3 2023 lúc 22:41

Câu 2:

Program HOC24;

var i,n: integer;

t: longint;

begin

write('Nhap N: '); readln(n);

t:=0;

for i:=1 to n do if i mod 2=0 then t:=t+i;

write('Tong cac so chan la: ',t);

readln

end.

Minh Lệ
19 tháng 3 2023 lúc 22:42

Câu 3:

Program HOC24;

var i,t,n: integer;

begin

write('Nhap N: '); readln(n);

t:=0;

for i:=1 to n do if n mod i=0 then t:=t+i;

write('Tong cac uoc cua ',n,' la: ',t);

readln

end.

Lưu Thùy Linh
Xem chi tiết
Nguyễn Hoàng Duy
29 tháng 3 2023 lúc 15:28

program TinhTongSoTuNhienLe;
var
  N, i, sum: integer;
begin
  write('Nhap so N: ');
  readln(N);

  sum := 0;
  for i := 1 to N do
  begin
    if i mod 2 = 1 then // Kiểm tra số lẻ
      sum := sum + i;   // Cộng dồn vào tổng
  end;

  writeln('Tong cac so tu nhien le nho hon hoac bang N la: ', sum);
  readln;
end.

Nguyễn Hoàng Long
Xem chi tiết
Nguyễn Hoàng Long
24 tháng 3 2023 lúc 20:30

Pls giúp vs ạ !!!

Phía sau một cô gái
24 tháng 3 2023 lúc 20:35

program TinhTong;

uses crt;

var

     n, i, tong: integer;

begin

     clrscr;

     write('Nhap vao so nguyen duong n: ');

     readln(n);

     tong := 0;

     for i := 1 to n-1 do begin

          if i mod 2 <> 0 then

               tong := tong + i;

     end;

     writeln('Tong cac so khong chia het cho 2 la: ', tong);

     readln;

end.

Yna Lolipop
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 3 2022 lúc 23:11

1:

#include <bits/stdc++.h>

using namespace std;

long long dem,i,n,x;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x%2==0) dem++;

}

cout<<dem;

return 0;

}

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

if (x%3==0) t+=x;

}

cout<<t;

return 0;

}

nguyennhalam
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 12 2021 lúc 13:41

#include <bits/stdc++.h>

using namespace std;

long long a[10000],i,n,dem;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

dem=0;

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

if (a[i]%3==0) 

{

cout<<a[i]<<" ";

dem++;

}

cout<<endl;

cout<<dem;

return 0;

}

Nguyễn Mai Ly
Xem chi tiết