1.
program z2;
var a,g:real;
begin
readln(a);
g:=(a/22)*(56-22);
writeln(g:4:2);
end.
<span>
2.
program z3;
var n,a,b,c:integer;
sa,sb,sc:real;
begin
writeln('Ведите количество учеников:');
readln(n);
writeln('Введите сколько:5,4,3');
readln(a,b,c);
sa:=(a*100)/n;
sb:=(b*100)/n;
sc:=(c*100)/n; writeln('пятёрок:',sa:4:2,'%');
writeln('четвёрок:',sb:4:2,'%');
writeln('троек:',sc:4:2,'%');
<span>end. </span></span>
B[1] =0
B[2] =3
B[3] =5
B[4] =7
B[5] =9
Используем нумерацию слов не с 1, а с нуля. Заметим, что кодирование слов происходит аналогично кодированию чисел в 4-ричной системе счисления, поскольку мощность алфавита равна 4 (4 буквы). Буква А соответствует 0, К - 1, Р - 2, У - 3.
Тогда слово РАААА - первое слово, которое начинается на Р, - соответствует числу 20000.в 4-ричной системе счисления
Слово РУУУУ - последнее слово, которое начинается на Р, - соответствует числу 23333.
Переведем их в десятичную систему счисления.
20000_4 = (2*4^4)_10 = 512_10
23333_4 = (30000-1)_4 = (3*4^4-1)_10 = 767_10
(X_Y - число X в системе счисления Y. Когда будешь оформлять, Y надо написать как индекс справа внизу от числа X)
Так вот, при нумерации с 1 слово РАААА будет 513-м, а слово РУУУУ будет 768-м