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.

begin

A:=0;

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

writeln (' tong =',A);

readln;

end.

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

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à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.

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.

Program HOC24;

var i,n: integer;

S,P: longint;

begin

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

{..............................................}

readln

end.

-----------------------------------------------------------

Bạn điền vào {........................} theo từng bài nhé

a) S:=0; 

for i:=1 to N do if i mod 2=1 then s:=s+i;

write('S= ',s);

b)

S:=0;

for i:=1 to N do if i mod 2=0 then s:=s+i;

write('S= ',s);

c) P:=1;

for i:=1 to N do if i mod 2=0 then p:=p*i;

write('P= ',p);

d)

P:=1;

for i:=1 to N do if i mod 2=1 then p:=p*i;

write('P= ',p);

Câu 1: 

#include <bits/stdc++.h>

using namespace std;

int t,i;

int main()

{

t=0;

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

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

cout<<t;

return 0;

}

2: 

#include <bits/stdc++.h>

using namespace std;

int i,dem;

int main()

{

dem=0;

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

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

cout<<dem;

return 0;

}

Toàn tính sai vì tính tổng các sô chắn thì kết quả phải ra số chẵn , nhưng bạn lại ra 2025( số lẻ ) nên là sai

( click đúng nha pn )

Mình nghĩ là sai .Kết quả đúng là:2360 phải không

MInh nghi la sai. ket qua la 2360 phai khong

sai vì là số chẵn nên kết quả ko thể là số lẻ đc

Sài, vì tổng các số chẵn k thể là 1 số lẻ

sai vì tổng các số chãn luôn là số chẵn ko thể là số lẻ

mà 2025 là số lẻ

Tổng các số chẵn là 1 số chẵn, kết quả toàn tính được 2025 là số lẻ do vậy toàn đã tính sai.