Слезно умоляю. мне❤️❤️❤️

program ; var n : integer; begin    for n: = 10 to 99 do        if n mod 13 = 0 then writeln(n);     readln; end.

нам дано, что на борту есть кок и капитан, т.е:

1) 15 голов - 1 кок - 1 капитан = 15-2= 13 - это количество матросов и котов вместе

дальше нам сказано, что всего лап и ног - 41:

2) от общего количества 41 - 1 нога капитана (т.к. было сказано, что капитан одноногий) - 2 ноги кока = 41 - 3 = 38 ног матросов и лап котов.

а дальше я сделала методом подбора, и у меня получилось 6 котов, 7 матросов, ну и кок с капитаном.

проверка:

  6*4 + 7*2 +1 + 2 = 41 ног и лап

6 + 7 + 1 + 1 = 15 голов

l*pi*((r+a)^2- (r)^2)*p

p - плотность

program sdss;

uses crt;

var a,b,i: integer;

      c: real;  

begin

clrscr;

readln(a,b);

for i: =a to b do

  c: c+i;

c: =c/(b-a+1);

writeln(c: 2: 4);

readkey;

end.