Написать алгоритм ввода значений в массив температур

спасибо огромное!

Но я не уверен правильно ли, пожалусто))

шяс проверим)

Я свой старый компилятор удалил))

олько Сишный есть, так тчо сам проверить не могу))

Var i,n : integer;t : array[1..100] of integer;Beginfor i:=0 to 100 do beginWrite('Enter temperature: ');Readln(t[i]);end;end.