али5553
05.03.2023 20:42

Решить в pascal королева арифметики решила озеленить свою столицу и заодно сосчитать жителей. для этого она приказала всем посадить вокруг каждого дома столько деревьев, сколько в этом доме живёт членов семей, а также их слуг. определить номер самого населённого дома (количество деревьев, растущих возле каждого дома записано в виде последовательности, заканчивающейся числом ноль).

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
kekngh
24.06.2020 11:01
Var a,b,n,k:integer;
begin
a:=0; read(n);
for k :=1 to n do begin
while b<>0 do begin
read(b); if a<b then a:=b;
end; end; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота