24 за программу_) паскаль 10 класс дан массив, заданный датчиком случайных чисел в интервале [-70; 150]. найти количество отрицательных и положительных элементов массива.

Const n=20;
var x : array[1..n] of integer;
   i, k1, k2 : integer;
begin
Randomize; 
writeln('Исходный массив:');
for i:=1 to n do
 begin
  x[i]:=random(221)-70;
   write(x[i],' ');
 end;
writeln;
k1:=0; k2:=0;
for i:=1 to n do
 begin
 if x[i] > 0 then k1:=k1+1;
 if x[i] < 0 then k2:=k2+1;
 end;
writeln('k1=',k1,'  k2=',k2);
end.

Пример:
Исходный массив:
73 -14 70 32 25 -31 110 117 11 -41 122 129 -49 54 65 57 -32 -49 110 -25 
k1=13  k2=7

Объяснение:Временные значения денег

В зависимости от точки зрения, номинальное значение денег может быть различным. Ключевое понятие здесь — временное значение денег. Вычисления, производимые над денежными суммами, могут производиться в настоящем или в будущем. Выбор типа вычислений основывается на

том, что сумма денег увеличивается, поскольку постоянно поступают начисления по процентам. Другими словами, вложив

один рубль сегодня, завтра вы получите больше.

Например, предположим, что богатенький заокеанский

дядюшка решил подарить вам деньги, причем нужно выбрать

один из вариантов.

Получить 80 000 руб. сегодня.

Получить 95 000 руб. через год.

Получить 120 000 руб. через пять лет.

Получать 1 500 руб. каждый месяц на протя

ответ:  17

// delete.cpp: определяет точку входа для консольного приложения.//
#include "stdafx.h"#include "iostream"#include <conio.h>
using namespace std;
int count_ = 0;
char m[6][6] = { {'S', '.', '.', '.', '#', '#'}, { '#', '.', '#', '.', '.', '.' }, { '.', '.', '#', '.', '.', '#' }, { '.', '.', '#', '#', '#', '.' }, { '#', '.', '.', '.', '#', '#' }, { '#', '#', '#', '.', '.', 'F' }};
int find_p(int x, int y) { if (x < 0 || x > 5 || y < 0 || y > 5) return 0; if (m[y][x] == 'F') return 1; if (m[y][x] != '.' && m[y][x] != 'S') return 0; m[y][x] = '+'; count_++; if (find_p(x, y - 1)) return 1; if (find_p(x + 1, y)) return 1; if (find_p(x, y + 1)) return 1; if (find_p(x - 1, y)) return 1; m[y][x] = 'x'; return 0;}

int main(){ find_p(0, 0); cout << count_; //вывод _getch(); // задержка    return 0;}