Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1 одноногий капитан (1 голова - 1 нога); 1 кок (1 голова - 2 ноги); 7 матросов (7 голов - 14 ног); 6 кошек (6 голов - 24 ноги).
а где сама таблица? все равно она везде одинаковая, так что держите фрагмент ваш:
byck is my dog.
for i : = 1 to length(s) do
begin
res : = res + s[i];
if i mod 2 = 0 then
end;
writeln(res);
i : = pos(" ",s); {ищем первый пробел}
delete(s; i; 1); {удаляем первый пробел}
i : = pos(" ",s); {ищем второй пробел, котрый теперь первый}
writeln(s[i-1]); {выдаем знак который находится перед пробелом}
var a: array [1..10] of integer;
i,k: integer;
read(a);
k: =1;
for i : = 1 to 10 do
if a[k]> a[i] then k: =i;
if k mod 2 = 0 then writeln(k," - chetnoe")
else writeln(k," - ne chetnoe");
end.
Популярные вопросы