Нужна помощь по информатике.
Задача: я ввожу 2 числа a и b.мне нужно найти частное этих двух чисел. Нужно использовать все варианты, к примеру если b равно нулю, то решения нет. Программу нужно написать(в ПАСКАЛЕ). нужно решить задачу используя условные операторы.
Заранее Большое Спасибо!

var a, b: real;beginwrite('Введите a, b>> ');read(a,b);if b=0 thenwriteln('Решения нет.')elsewriteln(a, ' : ', b, ' = ', a/b)end.