Оцените, сколько школьных сочинений размером в 3 машинописные страницы (в

одной странице 40 строк по 50 символов в

одной строке) можно уместить на гибком

диске ёмкостью 1,44 Мб?
​​

знаки той же арифметики, если эмоции- те же смайлики.

program xxx;

      var i, x, s : integer;

begin

  write('введите число х=');

  readln(x);

  s: =0

  i: =1

  while i < =x do

      begin

          s: =s+i;

          i: =i+2

      end;

  write('сумма нечетных чисел ='; s);  

  readln

end.

program mdd; uses crt; var a,b,c,d: longint; beginclrscr; readln(a,b,c,d); if (a> b) and (a> c) and (a> d) and (d< a) and (d< c) and (d< b) then writeln('правда')else writeln(''неправда); readkey; end.