Var t, h, mm, ss: integer; ct, ch, cmm, css: string;
begin Write('Введите время в секундах от начала суток -> ');Readln(t); h := t div 3600; t := t mod 3600; mm := t div 60; ss := t mod 60; Str(h, ch); ct := ch + ':'; Str(mm, cmm); if Length(cmm) = 1 then ct := ct + '0' + cmm + ':' else ct := ct + cmm + ':'; Str(ss, css); if Length(css) = 1 then ct := ct + '0' + css else ct := ct + css; Writeln('Указано время ', ct) end.
Тестовое решение: Введите время в секундах от начала суток -> 27429 Указано время 7:37:09
using namespace std;
int main()
{
double a,b,c,max,min;
int kp,kn,kz;
cin>>a>>b>>c;
kp=kn=kz=0;
if (a>0) kp++;
else if (a==0) kz++; else kn++;
if (b>0) kp++;
else if (b==0) kz++; else kn++;
if (c>0) kp++;
else if (c==0) kz++; else kn++;
if (a>b)
if (a>c) { max=a; min=(b>c) ? c : b; }
else { max=c; min=b; }
else
if (b>c) { max=b; min=(a>c) ? c : a; }
else { max=c; min=a;}
double mid=(a+b+c)/3;
cout<<"polozhit: "<<kp<<", nulevykh: "<<kz<<", otritsat: "<<kn<<endl;
cout<<"min="<<min<<", max="<<max<<", Srednee="<<mid<<"\n";
system("pause");
}
Тестовое решение:
-1.76 2.18 -0.543
polozhit: 1, nulevykh: 0, otritsat: 2
min=-1.76, max=2.18, Srednee=-0.041
Для продолжения нажмите любую клавишу . . .
t, h, mm, ss: integer;
ct, ch, cmm, css: string;
begin
Write('Введите время в секундах от начала суток -> ');Readln(t);
h := t div 3600;
t := t mod 3600;
mm := t div 60;
ss := t mod 60;
Str(h, ch);
ct := ch + ':';
Str(mm, cmm);
if Length(cmm) = 1 then ct := ct + '0' + cmm + ':' else ct := ct + cmm + ':';
Str(ss, css);
if Length(css) = 1 then ct := ct + '0' + css else ct := ct + css;
Writeln('Указано время ', ct)
end.
Тестовое решение:
Введите время в секундах от начала суток -> 27429
Указано время 7:37:09