Program gt;
var a,b,c,s:real;
begin
read(a,b,c);
if(abs(a)>1)or(abs(b)>1)or(abs(c)>1) then s:=(a+b+c)/3 else s:=a*b*c;
writeln(s);
end.
<span><span><em>1) </em></span><em>Break</em></span><em />
<span><em>2) Esc</em><span>
<em>
3) Enter</em><span>
<em>
4) </em><span><em>Page Down</em></span></span></span></span>
<em>1)</em><span><em>с информацией</em>
<em>2)</em></span><span><em>драйвером</em>
<em>3)</em></span><span><em>загрузки данных из внешней памяти в оперативную</em>
<em>4)</em></span><span><em>арифметико-логическое устройство</em>
<em>5)</em></span><span><em>контроллер</em>
<em>6)</em></span><span><em>комплекс программ, обеспечивающий поддержку работоспособности программного обеспечения и </em></span>
<span><em>аппаратных средств ПК</em>
<em>7)</em></span><span><em>Дж. фон Нейманом</em>
<em>8)</em></span><span><em>описание принципов работы ЭВМ</em>
<em>9)</em></span><span><em>сеть</em>
<em>10)</em></span><span><em>именованная последовательность данных, размещенных на внешнем носителе</em>
<em>11)</em></span><span><em>адаптер( контроллер)</em>
<em>12)</em></span><span><em>на машинном языке ( в двоичном коде)</em>
<em>12)</em></span><span><em>число двоичных операций, совершаемых процессором в единицу времени</em></span>
В ячейке a1 окажется формула = b1+1
в ячейке b1 окажется формула = c1+1
в ячейке c1 окажется формула = d1+1
в ячейке a2 окажется формула = b2+1
в ячейке b2 окажется формула = c2+1
в ячейке c2 окажется формула = d2+1
в ячейке a3 окажется формула = b3+1
в ячейке b3 окажется формула = c3+1
в ячейке c3 окажется формула = d3+1
если в ячейках d1 d2 d3 были нули то в результате получится такая табличка в ячейках <span>(A1:C3)</span>
3 2 1
3 2 1
3 2 1