Объяснение: Пока есть целая часть от деления на 8 делишь и записываешь остатки в обратном порядке
Спасибо
Ответ дал: Гость
program xxx;
var i, n : integer;
s : real;
a : array [1..20] of real;
begin
writeln('введите размерность массива n=');
readln(n);
write('введите элементы массива а: ');
for i: =1 to n do
readln(a[i]);
writeln('исходный массив а: ');
for i: =1 to n do
writeln(a[i]);
s: =0;
for i: =1 to n do
if a[i]> 0 then s: =s+a[i];
writeln('сумма положительных элементов =', s);
readln
end.
Ответ дал: Гость
если сравнивать объекты и их свойства между собой, то можно говорить о свойствах общих и отличительных.общие свойства объединять объекты в группу (группа – это множество объектов, где каждый объект является элементом этого множества). отличительные свойства отличить один объект от другого. например, свойство «защищать ноги» – это общее свойство ботинок, сапог, сандалий и туфель. а вот свойство «хранить тепло» – это отличительное свойство зимней обуви, если сравнивать её с летней.
информация бывает - визуальная (зрение) и звуковая (слух).
Популярные вопросы