На новый год родители 10 детей положили под ёлку по определённому колличеству конфет. пришёл добрый дед мороз и добавил к каждому подарку ещё по 100 конфет . сколько конфет получилось у каждого ребёнка? расчитать на паскале!
Const n=10; var a:array[1..n] of integer; i,s:integer; begin Randomize; writeln('Первоначальное количество конфет:'); for i:=1 to n do begin a[i]:=random(20)+10; write(a[i]:4); end; writeln; writeln('С добавленными конфетами:'); s:=0; for i:=1 to n do begin a[i]:=a[i]+100; write(a[i]:4); s:=s+a[i]; end; writeln; writeln('Всего конфет: ',s); end.
Пример: Первоначальное количество конфет: 26 10 18 23 24 22 11 15 20 12 С добавленными конфетами: 126 110 118 123 124 122 111 115 120 112 Всего конфет: 1181
var a:array[1..n] of integer;
i,s:integer;
begin
Randomize;
writeln('Первоначальное количество конфет:');
for i:=1 to n do
begin
a[i]:=random(20)+10;
write(a[i]:4);
end;
writeln;
writeln('С добавленными конфетами:');
s:=0;
for i:=1 to n do
begin
a[i]:=a[i]+100;
write(a[i]:4);
s:=s+a[i];
end;
writeln;
writeln('Всего конфет: ',s);
end.
Пример:
Первоначальное количество конфет:
26 10 18 23 24 22 11 15 20 12
С добавленными конфетами:
126 110 118 123 124 122 111 115 120 112
Всего конфет: 1181