Mình thấy hình như đâu sai câu nào đâu

Trúc chó : Đúng nhé.

Bài 2:

Program hotrotinhoc;

var i: byte;

begin

write('5 so tu nhien dau tien la : ');

for i:=0 to 4 do write(i,' ');

readln

end.

Bài 3:

Program hotrotinhoc;

var n,i: integer;

s: real;

begin

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

i:=0;

while i<n do

begin

inc(i);

s:=s+1/i;

end;

write('S=',s:1:2);

readln

end.

a) Sai 

b) Sai

c) đúng

d) đúng

thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko

mik gõ r mà mik chắc chắc 100% mật khẩu đó đúng . À mà mik lấy nick em mik vào trang của mik thì nó để là Nick đã bị đổi chủ! !

*Câu lệnh For..do

Dạng xuôi: for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

*Câu lệnh For..do

Dạng ngược: For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> do <câu lệnh>;

Bài 4

uses crt;
var a,b: integer;
c,s,d:real;
begin
clrscr;
readln(a,b);
if (a>0) and (b>0) then
begin
c:=sqrt(a*a+b*b);
d:=(a+b+c)/2;
s:=sqrt(d*(d-a)*(d-b)*(d-c));
writeln(c:4:2,'  ',s:4:2);
end
else writeln('nhap lai');
readln
end.

Bài 5

uses crt;
var r: integer;
s,t: real;
begin
clrscr;
readln(r);
s:=r*r*3.14;
t:=2*3.14*r;
writeln(s:4:2,'  ',t:4:2);
readln
end.

1:

#include <bits/stdc++.h>

using namespace std;

long long t,i,n;

int main()

{

cin>>n;

t=0;

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

cout<<t;

return 0;

}

Bài 2: 

#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+=i;

cout<<t;

return 0;

}

Bài 3: 

#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+=i;

cout<<t;

return 0;

}

Bài 4: 

#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%3==0) t+=i;

cout<<t;

return 0;

}

Bài 5: 

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=1;

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

t*=i;

cout<<t;

return 0;

}

D

a) ((a+b)>c) and ((b+c)>a) and ((a+c)>b)

b) (x<a1) or (x>a2)

c) (diem>=6) and (diem <8); 

(a*a<10) or (a mod 3=0)

Em cám ơn ạ