Нц
нц 3 раз
вниз
закрасить
вниз
кц
нц 3 раз
вверх
кц
влево
кц
Var i:integer; s:real;
begin
i:=1; s:=0;
while i<10 do
begin
i:=i+1;
s:=s+i/(i+1);
end;
writeln('s = ',s:6:4);
end.
Результат:
<span>s = 7.4801</span>
Ответ:
18 834 588 байт
Объяснение:
Число пикселей 1 772 × 3 543 = 6 278 196
Если на 1 пиксель надо 3 байта, то всего надо 18 834 588 байт
===== PascalABC.NET =====
begin
var a := ReadArrInteger(5);
a.Println
end.