ЧТО ДЕЛАТЬ? ПИШЕТ ЧТО ВСТРЕЧЕНО ELSE А ОЖИДАЛСЯ ОПЕРАТОР

var telephon,marka:real;
stoimost:integer;
begin
writeln('Выберите марку телефона');
writeln('Honor10');
writeln('Samsung A50');
writeln('Gelaxe S10');
writeln('Iphone 11');
writeln('Xiaomi Mi A3');
writeln('Xiaomi Redmi 7');
writeln('Samsung Galaxy A30s');
writeln('Huawei P30');
writeln('OnePlus 7T Pro');
writeln('Xiaomi Mi 9');
readln(marka);
1:stoimost := 30000;
2:stoimost := 16500;
3:stoimost := 21500;
4:stoimost := 35000;
5:stoimost := 12500;
6:stoimost := 21000;
7:stoimost := 17000;
8:stoimost := 26500;
9:stoimost := 41500;
10:stoimost := 71000;
ELSE write('Такого телефона нет!');
end;
write(stoimost);
end.