Кролик и бобер участвовали в одной команде по переноске воды из одного блюда в другое, используя соответственно - id300103420230405 от surok0902p01m1w 05.04.2023 13:28

Question

Информатика: Кролик и бобер участвовали в одной команде по переноске воды из одного блюда в другое, используя соответственно чашку и кружку. их команда проиграла. кролик обвинил бобра в том, что медленно бегал. на это бобер ответил, что в кружке он за раз переносил больше. им определить, кто из них прав, если кролик а раз вылил воду из чашки, бобр b раз? в кружку входило по с мл, а чашку по d мл. составить алгоритм решения

surok0902p01m1w · Accepted Answer

// PascalABC.NET 3.0, сборка 1128 const   nmax=100; var   n,i,j,nn,nz,np,t:integer;   a,an,az,ap:array[1..nmax] of integer; begin   // формируем массив и выводим его   Write( Количество элементов в массиве: ); Read(n);   for i:=1 to n do begin     a[i]:=Random(11)-5;     Write(a[i], )     end;   Writeln;   // разбиваем массив на три подмассива   nn:=0; nz:=0; np:=0;   for i:=1 to n do     if a[i] 0 then begin nn:=nn+1; an[nn]:=a[i] end     else       if a[i]=0 then begin nz:=nz+1; az[nz]:=a[i] end...

MOGZ ответил