Записать в развернутом виде: а) 456,21(8) б) 101101,111(2) b) cb5,189a(16) г) 378, 25(10)

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.

var s: string;

begin s : = 'видеоадаптер'; writeln(s); writeln(s[3] + s[2]+ s[5] + s[3]); writeln(s[12] + s[6] + s[3] + s[2] + s[5]); writeln(s[9] + s[6] + s[12] + s[10] + s[11] + s[12]); end.

месяцы,каждый месяц в каждом времени года-это и есть классификация

read(n);

if (n> 99) and (n< 1000) then writeln('yes');