РЕшите пожалуйста задачу на языке ПАСКАЛЬ:

блок схему сначало сделай

> так плодят балбесов практикантов

Балбесы плодят балбесов.

вот так плодят балбесов практикантов

непроверял, но чтото типа этого... .

Program chunga-changa;
Uses crt;
Var
a,b,m,i:real;
begin
writeln('Кол-во золота на острове Чунга');
readln (a);
writeln ('Кол-во золота на острове Чанга');
readln (b);
writeln ('Кол-во лет');
readln (m);
for i:=1 to m do
Begin
a:=a/2+b/3;
b:=b/3+a/2;
end;
Writeln('Чунга=',a,' Чанга=',b);
end.

в личку, сделаю, за скромное вознаграждение

Все просто:

Chunga:=(A+B)*0.4;
Changa:=(A+B)*0.6;

И не важно сколько лет пройдет :)

Удачи!

Вначале сказочный остров был разделен на три графства: в первом графстве жили только эльфы, во втором —" role="presentation" style="display: inline; font-style: normal; font-weight: normal; line-height: normal; font-size: 16px; text-indent: 0px; text-align: left; text-transform: none; letter-spacing: normal; word-spacing: normal; overflow-wrap: normal; white-space: nowrap; float: none; direction: ltr; max-width: none; max-height: none; min-width: 0px; min-height: 0px; border: 0px; padding: 0px; margin: 0px; position: relative;">—— только гномы, в третьем —" role="presentation" style="display: inline; font-style: normal; font-weight: normal; line-height: normal; font-size: 16px; text-indent: 0px; text-align: left; text-transform: none; letter-spacing: normal; word-spacing: normal; overflow-wrap: normal; white-space: nowrap; float: none; direction: ltr; max-width: none; max-height: none; min-width: 0px; min-height: 0px; border: 0px; padding: 0px; margin: 0px; position: relative;">—— только кентавры.

В течение первого года каждое графство, где жили не эльфы, было разделено на четыре графства. В течение второго года каждое графство, где жили не гномы, было разделено на пять графства. В течение третьего года каждое графство, где жили не кентавры, было разделено на шесть графств.

Сколько графств было на сказочном острове после всех этих событий?