Viết chương trình 4 số nguyên bất kì từ bàn phím. Tính tổng số lớn nhất với nhỏ nhất? Mn ai làm mk vote 5* câu trả lời hay nhất đúng nhất vs nhanh nhất
2 câu trả lời
Program FNG;
Uses crt;
Var a,b,c,d,min,max: longint;
Begin
Clrscr;
Write('Nhap a, b, c, d: '); Readln(a,b,c,d);
min:=a; max:=a;
If b>max then max:=b;
If b<min then min:=b;
If c>max then max:=c;
If c<min then min:=c;
If d>max then max:=d;
If d<min then min:=c;
Write('Tong: ',max+min);
Readln
End.
write(max(max(a,b), max(c,d)) + min(min(a,b), min(c,d)) );
Nhớ vote5* + câu trả lời hay nhất.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
