написать программу частного от деления 2-х чисел по информатике срочно!!!!!

ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;ПЕР  ч1, ч2: ЦЕЛ;УКАЗ  Вывод.Цепь("Введите делимое: ");  ч1 := Приём.Число();  Вывод.Цепь("^Введите делитель: ");  ч2 := Приём.Число();  Вывод.ЧВещ("^%d / %d = %g.", ч1, ч2, ч1 / ч2, 0)КОН Задание.