Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Thị Ngọc Minh
1.Viết 1 chương trình pascal nhập vào từ bàn phím 4 số nguyên a, b, c, d rồi in ra màn hình dãy thứ nhất là tổng của 4 số trên, dãy thứ 2 là giá trị lớn nhất của chúng. Giúp mình với...mình cần gấp
Minh Lệ
13 tháng 3 2021 lúc 13:03

Program HOC24;

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

t: longint;

begin

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

t:=a+b+c+d;

writeln('Tong 4 so tren la: ',t); 

max:=a;

if max<b then max:=b;

if max<c then max:=c;

if max<d then max:=d;

write('So lon nhat cua chung la: ',max);

readln

end.

Nguyễn Lê Phước Thịnh
13 tháng 3 2021 lúc 19:55

*Cách khác:

uses crt;

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

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

write('Nhap d='); readln(d);

writeln('Tong cua 4 so la: ',a+b+c+d);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

if max<d then max:=d;

writeln('Gia tri lon nhat la: ',max);

readln;

end.


Các câu hỏi tương tự
Nguyễn Trần Hồng Ngọc
Xem chi tiết
Hoàng Thị Minh Nguyệt
Xem chi tiết
Phước Thiện Lê Hoàng
Xem chi tiết
Nguyễn Bảo Việt
Xem chi tiết
Bé Kunz
Xem chi tiết
Quân Đoàn Long Tường
Xem chi tiết
Nguyễn Thị Linh
Xem chi tiết
Mai Ban
Xem chi tiết
lamgi hoi
Xem chi tiết