Структура
ответ 3
--------------------------
с т <u>у л</u> убираем 2 буквы c конца слова у и л
рука убираем 1 букву
тур + а
Поле задаётся свойством padding, отступ – margin;
поле определяется промежутком между содержимым и границей блока, отступ – между границами соседних блоков;
поля могут как учитываться в размерах элемента (ширине и высоте), так и нет.
var A:array[1..10] of integer;
i:integer;
s: integer;
begin
writeln('Массив А:');
s:=0;
for i:=1 to 10 do
begin
write('Введите ',i,'-e число ');
readln(A[i]);
if A[i] <> 0 then s:=s+1;
end;
write('Строка чисел: ');
for i:=1 to 10 do
begin
write(a[i],' ');
end;
writeln();
writeln('Сумма элементов, не равных нулю = ',s);
end.
Да будут, по скольку даны стороны. вроде бы так