Помогите составить блок-схему!!!!

Написать программу подсчета площади кольца. Программа должна проверять правильность введенных пользователем данных и, если они неверны, уведомлять об ошибке.

program lizochka_2;
uses crt;
var a,b,c:real;
begin
writeln('введіть радіус кола');
read(a);
b:=a*8;
write('периметр ');
writeln(b);
c:=a*a*4;
write('площа ');
writeln(c);
end.