Вы приобрели котёнка. Каждый вечер вы определяете его вес с помощью весов.Как можно...

Question

Вы приобрели котёнка. Каждый вечер вы определяете его вес с помощью весов.Как можно описать на Паскале массив, в котором будут храниться значения веса котён-ка в течение одного месяца (например, мая)?

Answer 1

Var m5 [1..31] of real
var
a: array[1..31] of real;
i:integer;
begin
writeln('Вес котенка (кг): ');
for i:=1 to 31 do
begin
write(i, ' мая: ');
readln(a[i]); //Заносим значения в массив
end;
end.   Впринципе, все, значения будут храниться в массиве, для вывода значений использовать оператор write.

Comments

нужна полная программа

---

var
a: array[1..31] of real;
i:integer;
begin
writeln('Вес котенка (кг): ');
for i:=1 to 31 do
begin
write(i, ' мая: ');
readln(a[i]); //Заносим значения в массив
end;
end.



Впринципе, все, значения будут храниться в массиве, для вывода значений использовать оператор write.

---

спасибо