На языке мне сделать проверку калькулятора: Нужно чтоб он проверял инпуты и говорил ошибку моментально если задано не то что надо(а мне надо чтоб там было какое либо число)

Вот код:

from colorama import init
from colorama import Fore, Back, Style

print(Fore.BLACK)
print(Back.CYAN)

a = float(input("Enter your first number: "))

if a == str():
exit()

print(Back.CYAN)

b = float(input("Enter your second number: "))

print(Back.GREEN)

what = input( "What will you do(+)? " )

print(Back.MAGENTA)

if what == "+":
c = a+b
print("Answer: " + str(c))

elif what == "-":
c = a-b
print("Answer: " + str(c))

elif what == "*":
c = a*b
print("Answer: " + str(c))

elif what == "/":
c = a/b
print("Answer: " + str(c))

else:
print(Back.RED)
print("Write something from the suggested!")
print("Try again next time.")

print(Style.RESET_ALL)
exit()

Дано Разрешающая сканера 600 х 600 dpi. Размер 10см х 15см. Глубина Цвета 3 байта. Найти: Каков информационный объем этого файла? Решение Вначале переводим глубину цвета из байт в биты 3 байта 8биТв байте 24 бит вычисляем разрешение сканера в 1 дюйме квадрат 600600 360 000 пикселей в 1 дюйм Переводим размер картинки из квадратов Сантиметров в Квадратные дюймы 10см 3.937дюйма 15см 5,906 дюйма 1015-150 смл2-3,937 5 906 23,25 дюйм Вычисляем в разрезе 23,25 дюймл2 360 000 пикселей в 1 дюйм 2E 8 370 000 пикселей Информационный объем вычисляем по формуле КОЛИЧЕСТВО ПИКСелей глубину цвета 8 370 000 пикселей 24 биTE 200 880 000 бит. lереводим в бай Ты делением На 8 25 110 000 байт или же делим на 10241024 чтобы получить количество мегабайт 23,95 мегабайт ответ: Информационный объем отсканированного изображения или 23,95 Мегабайт

program raf105;

var

 a,i,j,s: integer;

 f,st: string;

 inA,inB: boolean;

begin

 readln(a);

 readln(f);

 i:=1;

 while i < length(f)-1 do

   begin

     st:= f[i] + f[i+1];

     inA:= False;

     inB:= False;

     for j:=1 to length(st)-1 do

       begin

         if st[j] = 'a' then inA:= True;

         if st[j] = 'b' then inB:= True;

       end;

     if (not inA) or (not inB) then

       if st = 'bb' then

         f[i+1]:= 'a'

       else

         f[i+1]:= 'b';

       s:= s+1;

     i+= 2;

   end;

 writeln(s);

 for i:=1 to length(f)-1 do

   write(f[i],' ');

end.

PascalABC