Имеется словарь из 4000 слов, каждое из которых состоит из 5 символов. Слова могут содержать повторяющиеся символы. Минимальная мощность алфавита, обеспечивающего реализацию этого словаря, составит символ(-а,-ов).

первым кому удалось расшифровать египетские иероглифы, был французкий ученый жан-франсуа шампольон (1790-1832). он составил полный список иероглифов и их гречиских эквивалентов создав тем самым основу для перевода всех египетских текстов.

var i,s: integer;

begin

writeln('summa ');

for i: =100 to 999 do

if i mod 17 =0 then s: =s+i else s: =s+0;

writeln(s)

end.

ответ 138 номер последнего

решение 1024/8+10=128+10=138

1 байит= 8 бит

1)

var a,b,c,d: real;

begin

  read(a,b);

  c: =(a+b)/2;

  d: =2*a*b;

  if a> b then begin

    a: =d;

    b: =c;

  end;

  if a< b then begin

  a: =c;

  b: =d;

  end;

  writeln(a,' ',b);

end.

2)

var a,b: integer;

begin

  read(a,b);

  if (a< 1) or (a> 31) then writeln(' день введен неправильно');

  if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');

end.

3)

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b)and(a> c)then writeln(a);  

    if (b> a)and(b> c)then writeln(b);

  if (c> b)and(c> a)then writeln(c);

end.