Помогите плиз.
На паскале.
Даю много баллов

11. Введите с клавиатуры возраст человека (от 1 до 25) и выведите на экран сообщение о его статусе (ребенок, ученик или студент).
12. Введите с клавиатуры скорость объекта в км/ч (от 5 до 100) и выведите на экран сообщение об объекте (человек, велосипедист или автомобилист).

вторая задача

program HelloWorld;varspeed : integer;begin read(speed); case speed of 5..10: write('Пешеход'); 11..30: write('Велосипедист'); 31..100: write('Автомобилист'); else write('Некорректный ввод'); end;end.

Первая задачаprogram HelloWorld;varage : integer;begin                read(age);                case age of                  1..6: write('Ребенок');        7..17: write('Ученик');        18..25: write('Студент');        else write('Некорректный ввод');        end;end.