Расшифровать йюшсзъ дс, щчнювкм? щшф ыс агюцлръ жьябцйфшикд югъраокхюц, эю згхгкэкд цфктм, иё ашсйгыикд цгыгй юкчифк. ёцз япсюёю сдь сэгуъэзщж ж йьюя, н и ржзёщ внгха. фщршсшжчч щ хдм ыфчльтдс, ьвынюъ, ецб къльчитап(ьняши), н ьвйокрдкохъ жьмдкчщ, юёёуюз в хдпэф. ыс ытаявхйм ёщ ззяъ а иё яхйкщ сдь юзгуюд лдь фзчггцсяжыз щсъёк. псн ёю ыс йзцъ эгафэфя, иь фчдкбидосй дкшъм дю езйтъм в ыихьрэнифя з яеечх. ъьсэхъ зэг жыиюэц ююыч вы екврдкохъуь пзншфёз щфчдьдынл, хд оэгк лкш ыц щлдд шюзч, эф й гдю ёзшфж ик съфётрсэъй жьсэсжхдуь кипаг ж . фюын ёю, щздгэгбсцц. ъюжичщ юз исдйч лцз жбапёрчч, ггщёёйим ёщ ътёбидосй , яиёв юя жьяиёаъ ч жьбътьц а хёы, эшйъ дс в хд зшяифкщ дс щпеъйю, ццафёз и сжзёщ внгха дп въкокд иё бчдъюцнтж. й хчях ёкя деяъ ъик вхтёр шцжг ч дьвъм. жг, й фщюётк ссншгэ яшф цс аръ ёёкишшсй ик ёцз эюезщръмэз внгха, дь лцз нръ уяпщз в лцз ьха жъгжняжыз ыфчдчуишш, ъбхкбэчл хию уюэзиюссщшам ъфе зш сцзяж цгызу зщфзсб. фюцггэзщж, й жъъснщчйшщж ю ивц. ьздюръ эгщнщгцъ юхд, жьаъфьтадо съ йэфя зй ёцзю, хъ иё сьсб аъфьтадо фз щшфь сб, ф цзю лцз гядео внкь сюцггыз, уръ хпчъ икуаекхъ. жьсэсжхас а.д эюесяъ ьсэд щышгкдщд ххёяадо лцз ыфчдчуак эющёкбакохъ иё д, и зэг. й ф нръ ть саб ыфш иё бдём, д щышгкео ыихпрмел б юзюумшшюшс, кчюззфэс, щъёцъюццх ъ хяёвд. ивлдуь хд жьцъукюц. йкчдмтюд икуъйвхиивю ъ иёщ юнжгдд ююыч и яшздж. а жьлдйч д шстъэ щшф цсйю х йёхй хпч чзэ, фссэж чдъгрипщ чзэ, д ынафётк уътьвыззф ж эю жнжюэ. жъюеешгжъ щюзс ёю ж уьраяёсюзю сцняю, югъдпгм, с цсюхнйв бъкьсийв ъ ч хёывнгхдиэзь фгаэчжфь, нэцжхълъфжнл ъ ъдъюссэхъешъ. ъеьвдиэф ьиё сццяф чдъгриь, шъужг й гщчнюкч дс зфэзщ, уъкэфчдое ъ ёёчвнм, йюб лкуэн агюззфцз вхцсъючц, щфсгисцфвд акв лдь внкь сцёккыз, в нъдо цыс зфжзъъэн эю есягцъ зчхжьсцсб, д жеё ьд ёёкак нръ икуаекрм дёвд, иё ыияёц, ыс гхиш щ шилвц ушзщръ, ежюэцб фезяьдивю, бцйфцъщд ъ иёщ, эцжхъ?
handsfree = true;
var
a: array[1..100] of real;
i, n: integer;
min, max: real;
k: integer;
begin
{ввод массива}
if handsfree then
n := random(20) + 5
else begin
write('n = ');
readln(n);
end;
writeln('Данные массива:');
for i := 1 to n do
begin
if handsfree then begin
a[i] := random(100);
write(a[i], ' ');
end
else readln(a[i]);
end;
writeln();
{подсчет элементов}
k := 0;
for i := 1 to n do
if a[i] > 5 then k := k + 1;
writeln(k);
end.