a) 2a/b
b) abc/2
c) b/ac
d) b/(√(a2 + b)
a) 2a/b
b) abc/2
c) b/ac
d) b/(√(a2 + b)
Giúp em với ạ
Viết chương trình tính diện tích tam giác theo công thức sau: S = p(p a)(p b)(p c) với p = 1 2 (a+b+c) Dữ liệu vào: ba số nguyên a, b, c là ba cạnh tam giác 1 , , 1000 a b c Dữ liệu ra: Diện tích tam giác, làm tròn đến hai chữ số thập phân
nhờ các bạn chuyên tin giúp mink với:
viết chương trình nhập 3 số nguyên a, b , c từ bàn phím
a) đưa ra tổng a+b+c ra màn hình
b đưa ra màn hình số nhỏ nhất trong 3 số đó
c đếm xem trong 3 số đó có bao nhiêu số âm
giúp mink với mai mik kiểm tra rồi
1 bạn cần mua n cánh hoa hồng. Tại cửa hàng bán hoa giá của 1 cành hoa là m(đồng). Tuy nhiên, cửa hàng có chính sách giảm giá nếu khách hàng mua a cành hoa hồng trở lên thì giá bán giảm 25%. Nhập: m,n,a
Xuất ra:
n=15 n=30
m=1000 m=1000
a=20 a=10
=> Khi đó: T:= 15000 => Khi đó: T:=22500
program bai3;
type KM=array [1..100]of LongInt ;
var a,b:KM;
i,N,t:Integer;
begin
write('nhap N =');Readln(N);
t:=0;
for i:=1 to n do
begin
Write('nhap a [',i,']=');
readln (a[i]);
if (a[i] mod 2=0) then [i]:=sqr(b[i])
else b[i]:=a[i];
end;
readln;
end.
a) Với N= 6
A= 5 6 3 4 5 8
B=?
b)Với N = 6
A= 5 7 3 1 11 15
B= ?
Tại sao sử dụng readln(a,b) tốt hơn câu lệnh gán? Vì sao ?
Viết chương trình nhập vào 3 số nguyên a,b,c. Tìm giá trị lớn nhất của 3 số đó (có sử dụng chương trình con tìm giá trị lớn nhất)
Viết chương trình nhập vào 1 số nguyên n rồi đưa ra màn hình các kết quả
- Giá trị tuyệt đối của n
- bình phương của n
- số dư của bình phương n chia 3
Giải và biện luận phương trình bậc 2 bằng phương pháp toán học. Hãy viết chương trình.
tính trung bình cộng các phân tử của mảng chia hết cho 5.
Nhập vào độ dài đường kính d. Hãy đưa ra chu vi và diện tích đường tròn qua đường kính d (lập trình Pascal)