Для начала посчитаем сколько всего времени мальчик затратил на перекладывание рыбок в банку 40*2=80, затем посчитаем сколько он затратил времени, чтобы поймать рыбок 40*5*5%=210 всего 290/60=4,8мин
таблица в excel
А1 количество рыб В1 время на улов С1 время на перекладывание D1 общее время
A2-A41 ПРОСТО ПРОСТАВЬ ЦИФРЫ B2 вставь функцию =СУММ(B2;5*5%) и протяни до значения В42 и так далее
<u>4 строчка:</u> отсутствует ";"
<u>4 строчка:</u> write вместо writeln, чтобы не было переноса строки (так как считывание данных должно быть в виде:
<em>write();</em>
<em>readln(a);</em>
<u>10 строчка:</u> отсутствует ";"
<em>// PascalABC.NET 3.3, сборка 1599 от 17.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function sn(n:integer):integer; // сумма цифр числа
begin
n:=Abs(n);
Result:=0;
while n>0 do begin
Result+=n mod 10;
n:=n div 10
end
end;
begin
var (n,a,b):=ReadInteger3('Введите n,a,b через пробел:');
var m:=ArrRandom(n,a,b); m.Println;
var k:=ReadInteger('k=');
Writeln('Найдено чисел: ',m.Where(t->sn(t)=k).Count)
end.
<u>Пример</u>
Введите n,a,b через пробел: 15 -50 60
43 2 42 -26 -34 57 45 44 29 -41 -4 1 -17 38 -19
k= 7
Найдено чисел: 2
Удаление
копирование
перемещение
вставка
Обьект, природный для многих целей, выполняющий разнообразные функции, называют универсальным.