Question

ежедневно в зоопарке горилла получает 3 банана шипанзе 2 банана лемур 1 банан составьте программу определяющую сколько бананов требуется в день если в зоопарке живут G горилл S шипанзе L лимуров решите пожалуйсто это для паскала абс )

Answer 1

var G,S,L:integer;

BEGIN

write('Количество горилл = ');

readln(G);

write('Количество шимпанзе = ');

readln(S);

write('Количество лемуров = ');

readln(L);

writeln(G*3+S*2+L);

end.

Answer 2

Для решения этой задачи на Паскале можно использовать следующую программу:

pascalCopy code
program ZooBananas;

var
  G, S, L: Integer;
  totalBananas: Integer;

begin
  // Ввод количества животных
  Write('Введите количество горилл: ');
  Readln(G);

  Write('Введите количество шипанзе: ');
  Readln(S);

  Write('Введите количество лемуров: ');
  Readln(L);

  // Расчет общего количества бананов
  totalBananas := (G * 3) + (S * 2) + L;

  // Вывод результата
  WriteLn('В зоопарке требуется ', totalBananas, ' бананов в день.');
end.

При запуске программы, она запросит у пользователя количество горилл, шипанзе и лемуров в зоопарке, а затем рассчитает и выведет общее количество бананов, необходимых для кормления всех животных в день.