- Giải = Free Pascal giúp em ạ, em cảm ơn Ở Quốc gia thú cưng Berland đang là kì nghỉ bình đẳng. Để vinh danh ngày lễ, nhà vua đã quyết định cân bằng phúc lợi cho mọi công dân bằng chi phí của kho bạc nhà nước. Toàn bộ ở Berland có n công dân, phúc lợi của mỗi người trong số họ được ước tính là một số nguyên, đơn vị là burle (burle là tiền tệ ở Berland). Bạn là thủ quỹ của hoàng gia, chịu trách nhiệm đếm những khoản chi phí của vương quốc. Dữ liệu nhập: - số nguyên n (1 n 100) số công dân trong vương quốc Berland. - n số nguyên a1, a2, , an, trong đó ai (0 ai 106) phúc lợi của công dân thứ i. Kết quả: số nguyên S số lượng burle tối thiểu cần chi trả cho toàn bộ công dân, sao cho mỗi công dân đều có được phúc lợi như nhau. Ví dụ input 4 0 2 4 3 output 7 Input 54 108127 424062 352862 161960 289039 310242 820134 835980 680691 162905 477932 193152 464403 143055 625518 519902 940910 411754 493868 874114 69300 99852 26676 455680 339974 101613 990410 998326 818450 578543 949450 440358 770426 997360 94277 229528 696468 322300 285313 494565 768150 941823 790780 855466 909358 770007 80425 10164 786365 413173 981534 481545 420447 549505 Output -214649
Lời giải 1 :
uses math;
Var n,i,t,maxn: longint;
a: array [1..100000] of longint;
begin
read(n);
for i:= 1 to n do
begin
read(a[i]);
maxn:= max(maxn,a[i]);
end;
For i:= 1 to n do
t:= t + (maxn - a[i]);
write(t);
end.
Lời giải 2 :
var
a:array[1..100] of longint;
i,k,n,s,j,max:longint;
BEGIN
readln(n);
for i:=1 to n do
begin
read(a[i]);
end;
max:=a[1];
for i:=1 to n do
begin
If a[i]>max then max:=a[i];
end;
for j:=1 to i do
begin
k:=max-a[j];
s:=s+k;
end;
Write(s);
END.
Bạn có biết?
Tin học là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng. Tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin. Hãy tận dụng sức mạnh của tin học để giải quyết các vấn đề và sáng tạo ra những giải pháp mới!
Nguồn :
Wikipedia - Bách khoa toàn thưTâm sự lớp 8
Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần và sang năm lại là năm cuối cấp, áp lực lớn dần. Hãy chú ý đến sức khỏe, cân bằng giữa học và nghỉ ngơi để đạt hiệu quả tốt nhất!
Nguồn :
sưu tậpCó thể bạn quan tâm
Copyright © 2024 Giai BT SGK