Комментарий удален
Не обещаю что на 100% верно, потому что уже забыаю паскаль, но попробую написать....
Комментарий удален

Ответы и объяснения

2014-02-21T13:55:46+00:00
Var
i,n : integer;
t : array[1..100] of integer;
Begin
for i:=0 to 100 do begin
Write('Enter temperature: ');
Readln(t[i]);
end;
end.
Комментарий удален
Но я не уверен правильно ли, пожалусто))
Комментарий удален
Я свой старый компилятор удалил))
олько Сишный есть, так тчо сам проверить не могу))