Program n1;
var a,sum: integer;
begin
readln(a);
while a<>0 do
begin
if (a mod 6=0) and (a mod 10=4) then sum:=sum+a;
readln(a);
end;
writeln(sum);
end.
В каждом горизонтальном слое ядра расположены в форме квадрата, в i-м слое i рядов по i ядер - всего
.
Первая пирамида: 2 слоя,
ядер.
Вторая: добавляется еще 3-й слой, всего
ядер.
Третья:
ядер.
Четвертая:
ядер.
#include "iostream"
using namespace std;
int main(){
int secound =0;
int hh =0;
int mm =0;
int ss =0;
int ch[5];
cin >> secound;
hh = secound / 3600;
mm = secound/60 - hh * 60;
ss = secound - hh*3600 - mm *60 ;
if(hh >=24){
int b = hh / 24;
hh = hh - 24 *b;
}
ch[0] = hh;
if(mm< 10){
ch[1] =0;
ch[2] = ss;
}else
ch[1] = mm / 10;
ch[2] = mm - mm / 10 * 10;
if(ss< 10){
ch[3] = 0;
ch[4] = ss;
} else
ch[3] = ss /10;
ch[4] = ss - ss / 10 * 10;
cout << ch[0] << ':' << ch[1] <