Pascal задан массив x из 8 элементов. сформировать массив y по правилу:

const

 k = 8;

var

 i: integer;

 x, y: array[1..k] of real;

begin

 for i := 1 to k do

   Read(x[i]);

 for i := 1 to k do

 begin

   if i mod 2 = 0 then

     y[i] := 4 * x[i]

   else

     y[i] := cos(2 * x[i]);

   write(y[i], ' ')

 end;

end.

#include <iostream>

using namespace std;

int main()

{

   const int time = 86400;

   int a;

   cout << "Enter the time in seconds elapsed since the beginning of the day" << endl;

   cin >> a;

   int hh = a % time / 3600;

   int mm = a / 60 % 60;

   int ss = a % 60;

   int endhh, endmm, endss;

   int tmp = hh * 3600 + mm * 60 + ss;

   tmp = time - tmp;

   endhh = tmp / 3600;

   endmm = tmp / 60 - endhh * 60;

   endss = tmp - endmm * 60 - endhh * 3600;

   cout << "Now is: " << hh << " hh: " << mm << " mm: " << ss << " ss" << endl;

   cout << "before the midnight: " << endhh << " hh: " << endmm << " mm: " << endss << " ss" << endl;

   return 0;

}

Объяснение:

#include <iostream>

using namespace std;

int main()

{

   const int time = 86400;

   int a;

   cout << "Enter the time in seconds elapsed since the beginning of the day" << endl;

   cin >> a;

   int hh = a % time / 3600;

   int mm = a / 60 % 60;

   int ss = a % 60;

   int endhh, endmm, endss;

   int tmp = hh * 3600 + mm * 60 + ss;

   tmp = time - tmp;

   endhh = tmp / 3600;

   endmm = tmp / 60 - endhh * 60;

   endss = tmp - endmm * 60 - endhh * 3600;

   cout << "Now is: " << hh << " hh: " << mm << " mm: " << ss << " ss" << endl;

   cout << "before the midnight: " << endhh << " hh: " << endmm << " mm: " << endss << " ss" << endl;

   return 0;

}

Объяснение: