Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
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.
xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal
1B 4C
2A 5A
3C 6C
7.
program TBC;
uses crt;
var a,b,tbc:real;
begin
clrscr;
write('nhap so a:');readln(a);
write('nhap so b:');readln(b);
tbc:=(a+b):2;
writeln('tbc cua hai so a va b la:',tbc:6:2);
readln;
end.
a. 5x3 + 2x2 - 18x + 25 = 5*x*x*x + 2*x*x - 18*x + 25
c. \(\dfrac{2a^2+2c^2-a}{4}\)=(2*a*a+2*c*c-a)/4
d. \(\dfrac{x+y}{x-y}\)=(x+y)/(x-y)
Câu 2:
-Giống: Đều có tác dụng đọc dữ liệu
-Khác:
+Read: Đọc xong không xuống dòng
+Readln: Đọc xong rồi xuống dòng
Câu 3:
a) a*x*x*x+b*x*x*x+c*x+d
b) (4*sqr(x)-7*x-5)/(x-7)
c) (a+b)/(a-b)-(a-b)/(a+b)
Câu 4:
a) Integer;
b) Real;
c) Real;
Câu 1 bạn xem lại đề
không có quy tắc viết từ khóa trong pascal nhé bạn
Lời giải :
program hotrotinhoc ;
var i,n : integer ;
A: real ;
begin
write('nhap gia tri n='); readln(n);
A:=1;
for i:=1 to n do
A:=A*(1+1/(i*i));
write('Ket qua la',A);
Readln
end.
a)10^38
b)-10^-38
nêu các dạng thông tin cơ bản