Var i:integer; a:array [1..31]of integer;
begin
for i:=1 to 31 do readln(a[i]); next i;
end.
В этом массиве будут храниться значения веса котёнка.
var a:array [1..31]of integer; - это объявление массива, всё остальное - инициализация. Если вес подразумевается как вещественное число, то нужно объявить массив так:
a:array [1..31]of real;
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.