Ответ:
var i,n,k,a:integer;
begin
write('Введите количество проданных газет ');
readln (k);
write('Введите сколько получает продавец с продажи каждой из первых 50 газет ');
readln (a);
if k<=50 then writeln ('заработок продавца ',k*a)//если продано ровно 50 газет или меньше
else writeln ('Заработок продавца ',50*a+((k-50)*a*1.2))//если продано больше 50 газет
end.
Объяснение:
Если продано ровно 50 газет или меньше
, то заработок рассчитывается просто умножением количества газет (k) на стоимость продажи каждой из первых 50 газет (a).
Если продано больше 50 газет, то вычисляем сколько продавец получит за первые 50 газет (50*a - умножаем 50 газет на стоимость продажи каждой из первых 50 газет (a)) и к этому числу прибавляем деньги полученные за продажу остальных газет ((k-50)*a*1.2) - умножаем количество газет проданных после первых 50 (k-50) на стоимость газет с учётом процентов a*1,2)
1)АДЖК, 2)АГК, 3)АВК 4)АБЕК 5)АГЖК 6)АБВК 7)АВГК 8)АГДЖК
3) таблица 1 строка 2^5 потом 5 и в конце 550
вторая строка таблицы 2^9 потом 9 и в конце 630
4) вес 1 буквы в 128символьном алфавите будет равна 7 битам (тк 2^7=128) потом перемножаем на 20 на 50 и на 4 что бы узнать вес всего текста 7*4*20*50 = 28000 бит . что бы перевести биты в байты нужно поделить на 8 28000 бит : 8 = 3500 байт
1 и 2 устный так что ничем помочь не могу(
011011000111010100
101100010011110010
011111100010011101
