Program n1;
var a,sum,i: integer;
begin
sum:=0;
for i:=1 to 47 do
begin
readln(a);
if (a>0) and (a mod 3=0) then sum:=sum+a;
end;
writeln(sum);
end.
Активная ячейка В2
диапазоны: А1:А2, D1:E2, A4:C4
Ответ:
Дано:
640x480;
I=256Кбайт;
Найти: i.
Решение:
K=640*480=307200;
i=I/K=256(Кбайт)*307200=(1024*256)(Байт)/307200=(8*1024*256)(бит)/307200 (Примерно равно) 6.
Объяснение:
Получается 6,82666667, но округляем мы не до семи, а до шести. Потому что выделено 256Кбайт. Если бы мы взяли 7 цветов, это заняло бы больше места, чем 256Кб.
во-первых: задан ли двумерный массив с?
во-вторых, операторская скобка begin не нужна
в-третьих не поставлена точка с запятой после <span>c[i,j]:=a[i,j]+ a[i,j]</span>
<span>скоре всего ошибка в третьем...</span>
<span>алгоритм выполняет следующее: он берет элемент из двум. массива и в новый двумерный на это же место присваевает элементу значние, равное сумме этого элемента и его себя опять же,или,подругому, присвает ему значение, равное двум соотв. ему элементам в массиве предыдущ</span>
<span>например</span>
дан массив 2х3:
1 3 45
9 8 2344
тогда новый массив будет иметь вид:
2 6 90
18 16 4688