На массив выведите на экран значения положительных элементов, меньших 100

16 - 2^4 - 4 бита = 0.5байт

256 - 2^8 - 8 бита = 1байт

128 - 2^7 - 7 бита

4 - 2^2 - 2 бита = 0.25байт

512*1024*8 =  4`194`304 бит

640*480 = 307`200 бит

4 - 6

16 - 3

128 - 1

256 - 1

program sdss;

uses crt;

var a,b,i: integer;

      c: real;  

begin

clrscr;

readln(a,b);

for i: =a to b do

  c: c+i;

c: =c/(b-a+1);

writeln(c: 2: 4);

readkey;

end. 

обозначим уменьшаемое как abc. тогда нужное нам число - это cba, где c, a, b = {0,1,2,3,4,5,6,7,8,9}

по условию, abc - cba = xyz (*), где x, y, z = {a,b,c}. заметим, что abc - cba > 0, и, следовательно, a > c, т.е. c < 9 (**)

из (*) получим уравнения для вычитаний из младшего, среднего и старшего разрядов соответственно (a):

10 + c - a = z (заняли "1" из среднего разряда) (a.1)

10 + (b - 1) - b = 9 при любом b (заняли "1" из старшего разряда)

a - 1 - c = x (a.2)

уравнение (*) приобретает вид:

abc - cba = x9z (***)

но y = 9 не может быть цифрой c, поскольку c < 9 согласно (**). следовательно, возможными комбинациями x,z будут: (x,z) = {(a,,,,b)}.

рассмотрим систему уравнений (a) для всех возможных случаев:

1: x = a или b, z = c.

(a.1): 10 + c - a = c => a = 10 - противоречие (должно быть a < 10).

2: x = c, z = a.

(a.1), (a.2): 10 + c - a = a, a - 1 - c = c => 10 + c = 2*(2c + 1), a = 2c + 1 => 8 = 3c, a = 2c + 1 => c = 8/3 - противоречие (c должно быть целым числом).

3: x = c, z = b.

(a.1), (a.2): 10 + c - a = b, a - 1 - c = c => 10 + c - (2c + 1) = b, a = 2c + 1 => 9 - c = b, a = 2c + 1 => для всех возможных c: c = {0,1,2,3,4} получим соответствующие им значения a и b. (a,b,c) = {(1,9,,8,,7,,6,,5,4)}. подстановкой в (***) получим единственно возможное решение: (a,b,c) = (9,5,4), т.е a = 9, b = 5, c = 4.

итак, нужное нам число это cba = 459, другие два - 954 и 495 соответственно.

проверка: 954 - 459 = 495.

если первая дробь равна a/b, а вторая - c/d, то их сумма равна е = a/b + c/d = (a*d + c*b)/b*d (без последующего сокращения дроби е).

алгоритм:

1. ввести числа a,b,c,d.

2. рассчитать число е = (a*d + c*b)/b*d.

3. распечатать число е.