C++ Пользователь вводит с клавиатуры время в секундах с начала дня. Вывести на экран текущее время в часах, минутах и секундах. Посчитать, сколько часов, минут и секунд осталось до полуночи.

#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;

}

Объяснение:

это процесс целенаправленного воздействия на объект; осуществляется для организации функционирования объекта по заданной программе.

Объяснение:

В середине века выдающийся американский учёный Норберт Винер (1894−1964) , изучавший различные технические и биологические системы, установил, что управление в них осуществляется по общей схеме. Винер считается основоположником науки об управлении — кибернетики.

Существует большое количество различных определений понятия «кибернетика», однако все они сводятся к тому, что кибернетика — это наука, изучающая общие закономерности строения сложных систем управления и протекания в них процессов управления. Так как любые процессы управления связаны с принятием решений на основе получаемой информации, то кибернетику часто определяют ещё и как науку об общих законах получения, хранения, передачи и преобразования информации в сложных управляющих системах.

Будут вопросы - задавайте.

type a = array[0..999] of Integer;
var B, num: a; var N, k: integer; 
 
procedure SimpleNumber(B: a);
begin
    for var i := 0 to N-1 do begin
        for var j := 2 to 9 do begin
            if B[i] mod num[j] <> 0 then
                k += 1;
        end;
        if k = 8 then begin
             write('Есть простое число');
            break;
        end
        else if (k <> 8) and (i = N-1) then 
           write('Нет простых чисел');
        k := 0;
    end;
end;

begin
    for var i := 2 to 9 do begin
        num[i] := i;
    end;
    read(N);
    for var i := 0 to N-1 do 
        read(B[i]);
    SimpleNumber(B);
end.