Студент нашел в старой книге сведения о населении москвы в xix веке, составил таблицу по этим данным, построил диаграмму и сделал доклад на студенческой конференции. выделите здесь информационные процессы.

64000 бит/с*16 c=1024000 бита/8=128000 байт=125 килобайт

не ворую

не лгу

слабым 

program chislo;

var x: integer;

          z,y : real;

begin

readln(x);

y: =5.5;

z: = x-y;

writeln(z);

end.

при запуске программы вводите эти значения и тестируете.

program zadacha1; var ves, rost, optves: integer; begin  write('введите массу тела');   read(ves);   write('введите рост в см');   read(rost);   optves: =rost-100;   if ves> optves then write('вам необходимо похудеть на', abs(optves-ves) );   if ves< optves then write('вам необходимо поправиться на', abs(optves-ves) );   if ves=optves then write ('ваш вес оптимальный')end.