Напишите программу для подсчета суммы всех положительных и суммы всех отрицательных случайных целых чисел из диапазона от –100 до 100. количество случайных чисел вводиться пользователем.

Var a: array[1..100] of integer; b,c,d: integer; beginc: =0; d: =0; for b: =1 to 100 dobegina[b]: =random(41)-20; writeln('a[',b,']= ',a[b]); if a[b]> 0 then c: =c+1; if a[b]< 0 then d: =d+1; end; writeln('количество положительных значений равняется ',c); writeln('количество отрицательных значений равняется ',d); end. ?

х лет возраст дуба

0,6х лет возраст сосны

х-0,6х=84

0.4х=84

х=210 лет возраст дуба

210-84= 126 лет возраст сосны

Xскорость реки 10x-x=9x 90/5=18 9x=18 x=2 скорость реки 2*10=20 скорость катера