Телефон, запатентованный в США 1876 году, Александром Беллом, назывался «говорящий телеграф» . Трубка Белла служила по очереди и для передачи, и для приёма человеческой речи
В данной программе k - это количество шагов, т. е. от 6 до 12 включительно. Получается 7 шагов. Если совсем не понимаешь, то проще расписать каждый шаг от 6 до 12.
Например,
k:= 6; s:= 0+10
k:= 7; s:= 10+10
k:= 8; s:= 20+10
...
k:= 12; s:= 60+10
<span>Если "родителей должно быть не менее одной трети" (т.е. больше или равно), то в первом примере (где n=27, k=7) ответ должен быть 2, а не 3. 7+2=9 - это как раз 1/3 от 27. </span>
var n,k,m:integer;
begin
writeln;
readln(n);
readln(k);
m:=(n-1) div 3+1;
if m-k>0 then writeln(m-k) else writeln(0);
end.
Пример:
27
7
2
За одну минуту №1 съест 1/60 объекта "пицца", объект №2 - 1/30, №3 - 1/5. Вместе за одну минуту они съедят 1/60+1/30+1/5 = 1/60+2/60+12/60 = 15/60 = 1/4 объекта "пицца". Целиком объект будет съеден за время в 4 раза больше, т.е. за 4 минуты.
Ответ: 4 минуты.
Var i, sumkv, kvsum: integer;
begin
for i:=1 to 10 do
begin
sumkv:=sumkv+sqr(i);
kvsum:=kvsum+i;
end;
kvsum:=sqr(kvsum);
writeln('Сумма квадратов равна ', sumkv);
writeln('Квадрат суммы равен ', kvsum);
<span>end.</span>