Решить, завтра а я не понимаю, что от меня требуется нужно написать на паскале фермеру необходимо просчитать урожай яблок и прибыль с их продажи. ферма насчитывает n яблонь, каждая из может принести от 20 до 50 кг. содержание каждой яблони обходится в k рублей. наценка на 1 кг составляет g % от себестоимости.

Varn,k,a,b,c,g:integer;e:real;Beginwriteln('Количество яблонь: ');read(n);writeln('Содержание 1-ой яблони в рублях: ');read(k);writeln('Наценка на 1кг в процентах: ');read(g);a:=0;randomize;for c:=1 to n dobeginb:=random(20)+30;a:=a+bend;e:=k*g/100*a;writeln('Урожай составил ',a,' кг яблок.');writeln('Прибыль с проажи ',a,' кг яблок: ',e,' рублей.');end.