Những câu hỏi liên quan
TN
Xem chi tiết
NT
5 tháng 1 2022 lúc 13:22

Câu 1: 

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=1 to 20 do 

  if i mod 4=0 then t:=t+i;

writeln(t);

readln;

end.

Câu 2: 

uses crt;

var i,dem:integer;

begin

clrscr;

dem:=0;

for i:=1 to 20 do 

  if i mod 3=0 then dem:=dem+1;

writeln(dem);

readln;

end.

Bình luận (0)
XX
Xem chi tiết
H2
27 tháng 8 2017 lúc 9:43

(20+1)x[(20-1):1+1]=21x[19:1+1]=21x20=420 tk mk nha

Bình luận (0)
H24
27 tháng 8 2017 lúc 9:44

Số số hạng là :

 ( 20 - 1 ) : 1 + 1 = 20 ( số )

Tổng là :

 ( 20 + 1 ) x 20 : 2 = 210

                              Đ/S : 210 .

Bình luận (0)
MC
27 tháng 8 2017 lúc 9:44

(1+20).20 : 2=210

Bình luận (0)
TL
Xem chi tiết
NT
3 tháng 3 2021 lúc 13:23

Bài 1: 

uses crt;

var n,i:integer;

s:real;

begin

clrscr;

write('Nhap n='); readln(n);

s:=1;

for i:=1 to n do 

 s:=s*i;

writeln(n,'!=',s:0:0);

readln;

end.

Bình luận (0)
LV
4 tháng 4 2023 lúc 22:08

1).

program oken;

uses crt;

var n,i: integer;

      gt: qword;

begin

write('nhap n: '): readln(n);

gt:=1;

for i:=1 to n do gt:=gt*i;

writeln('N!=',gt);

readln;

end.

2).

program tongcacsole;

uses crt;

var t,i:longint;

begin

clrscr;

for i:=1 to 203 do 

  if i mod 2 = 1 then t:=t+i;

write(t);

end.

3).

program tongcacsochan;

uses crt;

var t,i:longint;

begin

clrscr;

for i:=1 to 20 do 

  if i mod 2 = 0 then t:=t+i;

write(t);

end.

Bình luận (0)
TL
Xem chi tiết
ML
27 tháng 2 2021 lúc 12:54

For i:=1 to 20 do if i mod 2=1 then t:=t+i;

Bình luận (1)
DN
27 tháng 2 2021 lúc 12:55

T:=0;

for i:= 1 to 20 do

If i mod 2 = 1 then tong:=i + T;

Bình luận (0)
NT
27 tháng 2 2021 lúc 18:48

*Cách khác

for i:=1 to n do 

  if i mod 2<>0 then t:=t+i;

Bình luận (0)
TL
Xem chi tiết
VP
27 tháng 2 2021 lúc 17:44

begin

A:=0;

for i:=1 to 20 do A:= A+i*2;

writeln (' tong =',A);

readln;

end.

Bình luận (0)
ML
27 tháng 2 2021 lúc 17:47

For i:=1 to 20 do if i mod 2=0 then t:=t+i;

Bình luận (0)
TL
27 tháng 2 2021 lúc 17:49

program im_14424;

uses crt;

var i, S: byte

begin

clrscr;

S:=0

for i:=1 to 20 do

begin

if i mod 2 = 0 then S:=S+i;

write('Tong cac so chan tu 1 den 20 la: ', S);

end;

readln;

end.

Bình luận (0)
H1
Xem chi tiết
NT
30 tháng 12 2021 lúc 23:38

#include <bits/stdc++.h>

using namespace std;

int t,i;

int main()

{

t=0;

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

if ((i%3==0) and (i%2==1)) t=t+i;

cout<<t;

return 0;

}

Bình luận (0)
VN
Xem chi tiết
DT
4 tháng 7 2017 lúc 10:13

Số số hạng :( 30 - 20 ) : 1 +1 = 31 (số)

Tổng là  : ( 30 + 20 ) : 2 x 31 = 775

Bình luận (0)
H24
4 tháng 7 2017 lúc 10:15

Có tất cả số số hạng là:

       ( 30 - 20 ) : 1 + 1 = 11 ( số )

Trung bình cộng các số hạng là:

       ( 30 + 20 ) : 2 = 25

Vậy tổng của các số hạng từ 20 đến 30 là:

       25 x 11 = 275

            Đáp số: 275

Bình luận (0)
T2
4 tháng 7 2017 lúc 10:17

20+21+22+...+30 =( 20 +30) x( (30-20) +1) :2 =50 x 11 :2 =25 x11=275

Bình luận (0)
NH
Xem chi tiết
DT
19 tháng 11 2018 lúc 8:37

Bình luận (0)
NA
Xem chi tiết
DH
27 tháng 10 2016 lúc 21:15

1) Các số lẻ từ 1 đến 2015 là:

 ( 2015 -1) :1 + 1 = 2015 ( số)

Tổng các số lẻ từ 1 đến 2015 là:

 ( 2015 + 1) x 2015 : 2 = 2031120

2) Số số hạng các số tự nhiên từ 1 đến 2016 là:

( 2016 - 1) : 1+1 =  2016 ( số hạng)

Tổng các số tự nhiên từ 1 đến 2016 là:

( 2016 + 1) x 2016 : 2 = 2033136

Bình luận (0)
HT
27 tháng 10 2016 lúc 21:16

1. Tổng: [(2015+1)x1008/2=5219 (theo công thức scuối + sđầu x ssốhạng /2)

2. Tổng: [(2016+1)x2016/2=2033136 nhas :D

Bình luận (0)
PL
27 tháng 10 2016 lúc 21:16

1 . 108864

2 . 2033136

cho mk nhé

Bình luận (0)