Замените число 10 в задании массива и циклах на нужное число действительных чисел (выделено жирным)
var
i, a, b, c: integer;
m: array[1..10] of real;
begin
for i := 1 to 10 do readln(m[i]);
for i := 1 to 10 do
begin
if m[i] > 0 then a := a + 1;
if m[i] = 0 then b := b + 1;
if m[i] < 0 then c := c + 1;
end;
writeln(с, ' ', a, ' ', b);
end.
Соответственно: Ра, Ии, Та и Ро.
<span>Информационная деятельность – деятельность, обеспечивающая сбор, обработку, хранение, поиск и распространение информации, а также формирование информационного ресурса и организацию доступа к нему.</span>Информация всегда играла чрезвычайно важную роль в жизни человека. Кто владеет наибольшим объемом информации по какому-либо вопросу, тот всегда находится в более выигрышном положении по сравнению с остальными. Общеизвестно высказывание о том, что тот, кто владеет информацией, тот владеет и миром.С давних времен сбор и систематизация сведений об окружающем мире помогали человеку выживать в нелегких условиях – из поколения в поколение передавался опыт и навыки изготовления орудий охоты и труда, создания одежды и лекарств. Информация постоянно обновлялась и дополнялась – каждое изученное явление позволяло перейти к чему-то новому, более сложному.Со временем большие объемы данных об окружающем мире поспособствовали развитию научно-технического прогресса и, как следствие, всего общества в целом – человек смог научится управлять различными видами вещества и энергии.<span>С течением времени роль информации в жизни человека становилась все существеннее. Сейчас, в первой половине XXI века роль информации в жизни человека является определяющей – чем больше навыков и знаний он имеет, тем выше ценится как специалист и сотрудник, тем больше имеет уважения в обществе.</span>
А,г,б,в)))))))))))))))))))