tokarevmax
?>

Задача проверяет знание арифметики. Пользователь вводит количество детей и конфет и получает, сколько конфет достанется каждому ребёнку. На

Информатика

Ответы

Анатольевич-Митюшин

var

n,a,s,b:longint;

begin

read(n);

for n:=1 to n do begin

read(a);

if (a<b) or (n=1) then b:=a;

s:=s+a

end;

write(s-b)

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Задача проверяет знание арифметики. Пользователь вводит количество детей и конфет и получает, сколько конфет достанется каждому ребёнку. На
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

yda659
nmakarchuk
Ruslan Zarekovkin
Tomilova1686
adman7
vallzh8328
Guskov
fudan
Стародубцева_Васильевич485
chulki-kupit
olgavbaranova
Лежачёва355
skachmin
natabodrikova
AnnaChulyukanova3