Дана программа на языке Паскаль.
Программа определения весовой категории в зависимости от веса спортсмена. Если вес спортсмена меньше 59, то «лёгкая категория» иначе «средняя категория».

program ves;
const
A1='легкая категория';
A2='средняя категория';
var
b : integer;
begin
write('введите вес спортсмена _ = ');
readln(_);
if _ < _ then writeln(A1) else writeln(A2);
readln;
end.