посчитать на сколько увеличился вес котенка за 10 дней с учетом того что вы ведёте таблицу и каждый вечер взвешиваете. первоначальный вес котёнка 300 г (задача решить)
В минуте 60 секунд. 1) Разделить число на 3600.Получим .целое число означает текущий час. Если из задонного числа вычесть получившееся целое число умноженное на 3600 получим число секунд в текущих минутах. 2)это число необходимо разделить на 60. Целое число будет означать текущую минуту. 3) вычитаем из оставшегося числа число минут умноженное на 60 получим текущую секунду.
// PascalABC.NET 3.0, сборка 1073 const nn=30; mm=30; var a:array[1..mm,1..nn] of integer; m,n,i,j,imax,jmax:integer; begin Writeln('Введите число строк и столбцов массива: '); Read(m,n); Randomize; Writeln('*** Исходный массив ***'); imax:=1; jmax:=1; for i:=1 to m do begin for j:=1 to n do begin a[i,j]:=Random(51)-25; Write(a[i,j]:4); if a[i,j]>a[imax,jmax] then begin imax:=i; jmax:=j end end; Writeln end; for i:=1 to m do a[i,jmax]:=0; for j:=1 to n do a[imax,j]:=0; Writeln('*** Результирующий массив ***'); for i:=1 to m do begin for j:=1 to n do Write(a[i,j]:4); Writeln end end.
