Вы приобрели котёнка. каждый вечер вы определяете его вес с весов.как можно описать на паскале массив, в котором будут храниться значения веса котёнка в течение месяца(например, мая)? ,напишите программу попроще.
Program Cat; const n=31; var mas:array[1..n] of integer; i:integer; begin for i:=1 to n do begin write('Введите вес котенка ',i,' -го мая'); readln(mas[i]); end; end.
Вообще-то описание массива содержится в строке
var mas:array[1..n] of integer;
А вся программа ввода иммет вид:
Program Cat;
const n=31;
var mas:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
begin
write('Введите вес котенка ',i,' -го мая');
readln(mas[i]);
end;
end.
const n=31;
var a:array[1..n] of integer; // Массив до 31
i:integer;
begin
a[1]:=1; // Обьявляем значения
a[2]:=3; // Обьявляем значения
// итд до 31
for i:=1 to n do writeln(i,' day:=',a[i]); // Вывод массива
end.