program giatriP ;
var P,a,b,c,d:real ;
begin
writeln('nhap a, b, c, d=');
readln(a, b, c, d);
P:=a*a+b*b-(c+d)*(c+d);
writeln('P= ');
readln
end.
program giatriP ;
var P,a,b,c,d:real ;
begin
writeln('nhap a, b, c, d=');
readln(a, b, c, d);
P:=a*a+b*b-(c+d)*(c+d);
writeln('P= ');
readln
end.
Viết chương trình tính giá trị của biểu thức: D = 2(a+b)
(Với a, b là 2 số nguyên được nhập vào từ bàn phím.)
viết chương trình tính giá trị biểu thức c= (a + b)/2
làm ơn nhanh lên cần gấp
Câu 1: Viết biểu thức sau bằng kí hiệu pascal
a, (a+b)2 (d+e) b, ax2+bx2+cx
Câu 2: Nêu qui tắc đặt trong ngôn ngữ lập trình Pascal
Câu 3: Viết chương trình tính diện tích hình chữ nhật S với a , chiều rộng b nhập từ bàn phím
MONG MẤY MẤY BẠN GIẢI GIÚP
MÌNH CẦN GẤP
Viết chương trình pascal thực hiện tính toán các biểu thức sau:
a) 7.(8 + 5 -2)-30+12
b)(15+5)^2.(6+4)^3
(Mình đg cần mong mn giúp, thanks ạ)
Hãy viết 1 chương trình Pascal để tìm kết quả của biểu thức sau: (x-2)\(^2\)(x+2)+(x+2),x là số được nhập từ bàn phím.Sau đó in ra màn hình kết quả của biểu thức.
Câu 1: Sau khi thực hiện chưng trình pascal sau đây, biến S có giá trị là bao nhiêu ? Var x : integer;
Begin
S:=0
For i:=1 to 10 do
If ( i mod 2) = 0 then S:=S+i;
Readln;
End
A.10 B. 20 C. 30 D. 40
Câu 2: Khi thực hiện đoạn chương trình sau, kết quả trên màn hình là:
So:=1;
While so<10 do Begin
Write (so : %);
So:= So +2;
End.
Bài 1: Hãy viết các biểu thức toán dưới đây bằng các kí hiệu trong Pascal:
a, ax2+bx+c
b,\(\dfrac{a-b}{c-d}\) + a2
Bài 2:Viết phương trình nhập vào hai số nguyên khác nhau A và B, in ra màn hình số lớn nhất
( Mk cần gấp ạ )
Cho hai biến a,b, có kiểu dữ liệu số nguyên. Em hãy viết chương trình Pascal thực hiện các yêu cầu sau: a) Khai báo hai biến a,b. b) Nhập giá trị của hai biến a,b từ bàn phím. c) In kết quả tổng của a,b ra màn hình.
viết chương trình cho máy tính thực hiện phép tính A= 1+2+3... với a > or < 1500 pascal