record type (помогите)

[Un1q]

Известны данные о стоимости каждой из 15моделей автомобилей и o6 их типе (легковой или грузовой). Найти среднюю стоимость легковых автомобилей.

[Mad_Cat]

type TCar = record
c:real; // цена
m:string[40]; //Модель
t:char;// тип
end;
var AC:array[1..15] of TCar;
s:real;cc:integer;
begin
{.............}
cc:=0;
for i:=1 to 15 do
if (ac[i].t='L') then begin cc:=cc+1;s:=s+ac.c;end;

if cc<> 0 then writeln(s/cc);
{.........}
end.

[ZX Spectrum-128]

K:=0;
Sr:=0;
For i:=1 to 15 do
  If auto.tip='легковой' then 
     Begin
       Sr:=sr+auto.stoimost;
       K:=k+1;
     End;
   Sr:=sr/k;

[Un1q]

ошибка

[Mad_Cat]

и чего в ней написано? праально, "неизвестный идентификатор". Что надо сделать?
праально - обьявить

I:integer;

и ,кстати, то, что вы накорябали, вам ни черта не выведет так как массивчег пустой и окошко в ТП схлопнется, потому что кое-чего опять-таки не хватает

[Un1q]

http://picup.su/img/29948.html
еще ошибка((

[Mad_Cat]

еще ошибка((

в гугле бан?

Значение ошибки 121
Неверный квалификатор

Тип ошибки 121
Ошибка компилятора Turbo Pascal

Описание ошибки 121
Возможные причины сообщения: Вы пытаетесь индексировать переменную, которая не является массивом; Вы пытаетесь указать поля в переменной, которая не является записью; Вы используете в качестве указателя переменную, которая не является указателем.

if (ac[i].t='L')

[Un1q]

есть возможность прогу на паскале проверить ? а то ошибки еще есть тут( да в гугле бан(

[Mad_Cat]

есть возможность прогу на паскале проверить ? а то ошибки еще есть тут

за отдельную плату, конечно

лан) спасибо

не за что, ещё приходите

[Un1q]

лан) спасибо денег нет)