Вычислите выражения: а) (111110222 + af16) : 368 = б) 1258 +1012 х 2а16 – 1418 =

program bapehbe;

var

    l, b, s : integer;

    o : real;

begin

    writeln (' skolko litrov varenya v tazy? ');

    readln (l);

    writeln (' kakaya emkost banok? ');

    readln (b);

    s: = l div b;

    o: = l mod b;

    writeln (' polnih banok_', s);

    writeln (' litrov ostaloc_', o: 2: 2);

    readln;

end. 

program kvadrat;

var i : integer;

begin

for i: = 10 to 100 do

writeln ( i: 2, i*i : 5);

readln;

end.