Самый большой круг птица. в нём воробей и перелётная птица.в перелётной птице аист и ласточка
Я вот тоже Вышел порешать =).
var p: array [1..1000] of record
slovo:string;
k:integer;
end;
N,i,j,max:integer;
c:char;
a:array [97..122] of integer;
BEGIN
max:=0;
readln(N);
for i:=1 to N do
begin
p[i].slovo:='';
repeat
read(c);
p[i].slovo:=p[i].slovo+c
until c=' ';
readln(p[i].k);
for j:=1 to length(p[i].slovo) do
if (ord(p[i].slovo[j])>=97) and (ord(p[i].slovo[j])<=122) then
a[ord(p[i].slovo[j])]:=a[ord(p[i].slovo[j])]+p[i].k;
end;
for j:=97 to 122 do
if a[j]>max then
max:=a[j];
write(max);
end.
Там внизу есть ссылка на ответы. если нет то я ничем нимагу помочь. сорян
В содержательном подходе количество информации заключено в сообщении, определяется объёмом знаний, который это сообщение несёт получающему его человеку. Проблема измерении информации исследована в теории информации основатель которой Клод Шеннон.
Помотреть в компьютере важную информацию о предмете