Cấu trúc rẽ nhánh và lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
dang thi khanh ly

Viết chương trình cho cc bi tốn sau
Bài 1:
Nhập bốn số a , b , c , d . Hãy tìm giá trị lớn nhất của chúng và gán giá trị lớn
nhất đó cho biến Max.
Bài 2: Nhập 3 số a , b , c bất kì . Hãy kiểm tra xem ba số đó có thể là độ dài ba
cạnh của một tam giác hay không ? Thông báo lên màn hình ‘ Thỏa mãn ‘, ‘
Không thỏa mãn trong từng trường hợp tương ứng.

B4
Lập trình tính tổng : A = 1 + 1/2 + 1/3 + … + 1/n ở đây n là số tự nhiên được
nhập vào từ bàn phím .
B5
Tính hàm lũy thừa a \(^n\) , ở đây a thực và n tự nhiên được nhập vào từ bàn phím .

Minh Lệ
5 tháng 3 2020 lúc 20:40

Bài 1:

Program hotrotinhoc;

var a,b,c,d,max: integer;

begin

write('Nhap a,b,c,d :'); readln(a,b,c,d);

max:=0;

if a>max then max:=a;

if b>max then max:=b;

if c>max then max:=c;

if d>max then max:=d;

write(max);

readln

end.

Bài 2:

Program hotrotinhoc;

var a,b,c : integer;

begin

write('Nhap 3 canh a,b,c'); readln(a,b,c);

if (a+b>c) or (a+c>b) or (b+c>a) then write('Thoa man') else ('Khong thoa man trong tung truong hop tuong ung');

readln

end.

Bài 4: Câu hỏi của Quỳnh Như - Tin học 8 | Học trực tuyến

Bài 5:

Program hotrotinhoc;

var a,n: integer;

t: longint;

begin

Write('Nhap a,n :'); readln(a,n);

t:=1;

for i:=1 to n do

t:=t*a;

write(t);

readln

end.

Khách vãng lai đã xóa

Các câu hỏi tương tự
Huyền Nguyễn
Xem chi tiết
Lê Thái Hưng Thịnh
Xem chi tiết
phạm hương trà
Xem chi tiết
Vũ Ngọc Lan
Xem chi tiết
Hạ Nhật
Xem chi tiết
darkknight
Xem chi tiết
nguyễn hoàng lê thi
Xem chi tiết
phươngplayergamer
Xem chi tiết
Lê Thái Hưng Thịnh
Xem chi tiết