Program zzz; var A,B,C: array[1..20] of integer; SB,SC: integer; i,kb,kc: byte; begin kb:=0; //количесво элементов в массиве B kc:=0; //количесво элементов в массиве C SB:=0; //сумма элементов массива B SC:=0; //сумма элементов массива C For i:=1 to 20 do begin writeln('введите ',i,'-й элемент массива'); readln (A[i]); if A[i]>=0 then begin kb:=kb+1; B[kb]:=A[i]; SB:=SB+B[kb] end else begin kc:=kc+1; C[kc]:=A[i]; SC:=SC+C[kc] end end; writeln(kb:4, sb:8, kc:4, sc:8); end.
var A,B,C: array[1..20] of integer; SB,SC: integer; i,kb,kc: byte;
begin
kb:=0; //количесво элементов в массиве B
kc:=0; //количесво элементов в массиве C
SB:=0; //сумма элементов массива B
SC:=0; //сумма элементов массива C
For i:=1 to 20 do begin
writeln('введите ',i,'-й элемент массива');
readln (A[i]);
if A[i]>=0
then begin kb:=kb+1; B[kb]:=A[i]; SB:=SB+B[kb] end
else begin kc:=kc+1; C[kc]:=A[i]; SC:=SC+C[kc] end
end;
writeln(kb:4, sb:8, kc:4, sc:8);
end.
Оглавление
Программа Microsoft Excel: абсолютные и относительные ссылки
Определение абсолютных и относительных ссылок
Пример относительной ссылки
Ошибка в относительной ссылке
Создание абсолютной ссылки
Смешанные ссылки
Изменение типа ссылки: относительная, абсолютная, смешанная
Типы ссылок MS EXCEL на ячейку: относительная (A1), абсолютная ($A$1) и смешанная (A$1) адресация
Абсолютная адресация (абсолютные ссылки)
Относительная адресация (относительные ссылки)
Смешанные ссылки
Вводим знак $ в адрес ячейки
"СуперАбсолютная" адресация
Абсолютная и относительная ссылка в Excel. Как использовать?
Определение
Относительная ссылка
Абсолютная ссылка
Смешанная
Абсолютная ссылка в Excel фиксирует ячейку в формуле
Абсолютные и относительные ссылки в Excel
Использование абсолютных и относительных ссылок в Excel
Типы ссылок на ячейки в формулах Excel
Объяснение: