a) đúng

b) đúng

c) đúng

d) kết quả phụ thuộc vào biến x

nếu x<=1 thì đúng

ngược lại thì sai

a) sqr(sqr(sqr(x))+3)-2/(sqr(x)*x)+sqr(2x+1)

b) a*x*x*x+3*sqr(a)*x+3*a*sqr(x)+a*x+c

sqr là hàm lấy bình phương nhé bạn

#include <bits/stdc++.h>

using namespace std;

long long s1,s2,s3,s4,i;

int main()

{

s1=0;

for (i=1; i<=100; i++) s1=s1+i*i;

s2=0;

for (i=1; i<=100; i++) if (i%2==1) s2+=i;

s3=0;

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

{

if (i%2==1) s3+=i*i;

else s3-=i*i;

}

s4=0;

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

{

if (i%2==1) s4+=i;

else s4-=i;

}

cout<<s1<<" "<<s2<<" "<<s3<<" "<<s4;

return 0;

}

a) a*a+1-2=b

b) (15*15)+((16+a)*(16+a))=c

c) 1/((15+1)*(15+1))-6=b

tất cả các câu đều là s:=s+i hay s:=s+1/sqr(i)..vân vân bạn ạ

var i,n:integer;

x,y,A:real;

begin

write('Nhap gia tri cho x va n');

readln(x,n);

A:=0;

y:=1;

for i:=1 to n do

begin

y:=y*sin(x);

A:= A + y;

end;

write('Tong A la: ',A:8:4);

readln

end.

Program bai1;

uses crt;
var i,x,a,kq:longint;
Begin
clrscr;
writeln('Chuong trinh tinh X^a');
write('X=');readln(x);
write('a=');readln(a);
kq:=1;
for i:=1 to a do
kq:=kq*x;
writeln(x,'^',a,'=',kq:4);
readln;
end.

bài 2:

Program bai2;

uses crt;

var n,i: integer;

s: real;

begin

clrscr;

write('nhap so n ='); readln(n);

s:=0;

for i:= 1 to n do

s:=s+exp(n*ln(i));

writeln('tong =',s :4:2);

readln;

end.

Câu 1 :

a) (a+b)*(a+b)*(d+e)

b) a*x*x+b*x*x+c*x

Câu 2: Mình không hiểu đề lắm? Đặt cái gì cơ?

Câu 3:

Uses crt;

Var S,a,b:real;

Begin

clrscr;

Writeln('Nhap chieu dai a = '); Readln(a);

Writeln('Nhap chieu rong b = '); Readln(b);

S := a*b;

Write('Dien tich hinh chu nhat la ', S );

Readln;

End.

Câu 1:

a) (a+b)*(a+b)*(d+e);

b) a*x*x+b*x*x+c*x

Câu 2:

Qui tắc đặt tên trong ngôn ngữ lập trình Pascal:

- Tên không bắt đầu bằng chữ số.

- Tên không có khoảng cách.

- Tên không được trùng với từ khóa.

- Các đại lượng khác nhau có tên khác nhau.