1. реши : сгенерируй последовательность случайных чисел, которые принадлежат промежутку [1..100], выведи их на экран и посчитай количество четных чисел. 2. реши : вывести на экран таблицу значений функции y=(x2+x3)/(x5). количество значений вводится. начальное значение х = -1, значение аргумента выводится с шагом h=1. 3. 2, с. 90(рт)

2^i = 32, i = 5 бит приходится на 1 символ

2^i = 64, i = 6 бит приходится на 1 символ

т.к. количество символов в тексте одинаковое, то 6 : 5 = 1,2

информационный объем второго текста в 1,2 больше, чем у первого текста.

program p_1; var i, n : integer; a, s : real; b : array [1..1000] of real; begin writeln('введите число а'); readln(a); writeln('введите количество значений массива n'); readln(n); write('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if b[i] > a then s: =s+b[i]; writeln('сумма значений =', s); end.

состояние тропосферы в данной местности и в данное время называеться погодой