Дано трёхзначное число 100 - 499. первая цифра числа означает действия (1-сложение, 2-вычитание, 3-умножение, 4-деление). две последующие цифры являются . вывести на экран результат вычисления. вывести сообщение в случае некорректности входного числа
program ryazantsev;
var n,a,b:integer;
begin
readln(n);
if n in [100..499] then begin
a:=(n mod 100) div 10; //Первое число
b:=(n mod 100) mod 10; //Второе число
case n div 100 of
1: writeln(a+b);
2: writeln(a-b);
3: writeln(a*b);
4: writeln(a/b)
end
end
else writeln ('Некорректный формат ввода!')
end.