Построй на экране с исполнителя Чертёжник квадрат, длину его стороны введи с клавиатуры и рассчитай площадь этого квадрата: использовать Чертёжник
алг площадь
нач
цел a
вывод "Введите длину стороны квадрата:"
ввод ()
вывод "Площадь квадрата равна:"
вывод
опустить перо
сместиться на вектор (0,)
сместиться на вектор (а,)
сместиться на вектор (0,−а)
сместиться на вектор (,0)
кон

решение: наливаем в 5-вую и из нее в 3-вую, в ней осталось 2 литра. из 3-ой выливаем все обратно, оставшиеся 2 литра выливаем в 3-вую. затем наполняем 5-вую и из нее отливаем 1 литр в 3-вую, итак в 5-литрой 4 литра

program xxx;

  var i, n, s : integer;

begin

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

    readln(n);

    s: =0;

    i: =2;

    while i< =n do

        begin

          s: =s+i;

            i: =i+2

        end;

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

    readln

end.

program xxx;

  var i, k, c, e : integer

begin

  k: =0;

  for i: =100 to 999 do

      begin

          c: = i div 100;

          e: =i mod 10;

          if c = e then k: =k+1

    end;

  writeln('кол-во палиндромов =', k);

  readln

end.

для начала переведем 100мбит в байты.

100мбитс=100*1024*1024/8=13107200 байт

  13107200 байт*1с =  13107200 байт.

ответ:   13107200 байт.