По данной блок схеме решить задачу

Программа:

Pascal:

var

 a, b, c, m: real;

begin

 write('a = ');  readln(a);

 write('b = ');  readln(b);

 write('c = ');  readln(c);

 m := (2 *max(a, b) + min(a + 3, b)) / (min(c, a - b));

 writeln('m = ', m);

end.

1 символ = 1 байт

70*50=3500 байт

3500*8=28000 бит(вес одной страницы)

1 мегабит = 1048576 бит

1048576*100=104857600 бит

104857600/28000=3744 страниц

uses crt; var

  a,b: integer; begin  write('введи возраст саши: '); read(a);

  write('введи возраст маши: '); read(b);

  writeln;   if a> b then write('саша старше маши');   if a< b then write('маша страше саши');   if a=b then write('маша и саша - ровесники'); end.