Ошибка есть и она не одна.
1. Код приведен не полностью - после else должно быть что-то еще и обязательно замыкаться end.
2. abc - не такой функции в Паскале, возможно Вы имели в виду abs - абсолютная величина, т.е. модуль.
3. if ab then ... это тоже не верно, т.к. ab - не является логическим выражением или булевой пременной - видимо не дописал: if ab>ac then...
Uses crt;
var a:array [1..5] of integer;
min,i:integer;
begin
clsclr;
for i:=1 to 5 do
read(a[i]);
min:=a[1];
for i:=2 to 5 do
if a[i]<min then min:=a[i];
write('min=', min);
readkey;
end.
#python 3.6
nomer = int(input())
if nomer in range(1, 3) or nomer==12:
print('Зима')
elif nomer in range(3, 6):
print('Весна')
elif nomer in range(6, 9):
print('Лето')
elif nomer in range(9, 12):
print('Осень')
else:
print('Ошибка')
9B16 (20символовнаответминимально)
Мы ежедневно сталкиваемся с информацией, например читая газету, смотря фильм или телевизор, или просто слушая музыку. Книги - тоже информация. Даже благодаря нашему зрению и слуху мы получаем информацию об окружающем нас мире.