 denisbutrik 
                                                13.04.2020 11:19
                                                
                                                denisbutrik 
                                                13.04.2020 11:19
                                             ksapko 
                                                13.04.2020 11:19
                                                
                                                ksapko 
                                                13.04.2020 11:19
                                             228УЕБАН228 
                                                13.04.2020 11:19
                                                
                                                228УЕБАН228 
                                                13.04.2020 11:19
                                             NooDys 
                                                28.07.2019 19:10
                                                
                                                NooDys 
                                                28.07.2019 19:10
                                             diana0483 
                                                28.07.2019 19:20
                                                
                                                diana0483 
                                                28.07.2019 19:20
                                             соня1584 
                                                04.08.2019 14:40
                                                
                                                соня1584 
                                                04.08.2019 14:40
                                             vadar22222 
                                                22.07.2019 13:30
                                                
                                                vadar22222 
                                                22.07.2019 13:30
                                             vladimirn177 
                                                22.07.2019 13:30
                                                
                                                vladimirn177 
                                                22.07.2019 13:30
                                             UbisCraft 
                                                22.07.2019 13:30
                                                
                                                UbisCraft 
                                                22.07.2019 13:30
                                             ncrfeed 
                                                30.04.2021 17:28
                                                
                                                ncrfeed 
                                                30.04.2021 17:28
                                            
Var
a, b, c, d, m, n:integer;
Begin
Readln(a, b, c, d) ;
m:=a*d;
n:=b*c;
Write(m, ', ', n) ;
End.
```
program DivisionOfFractions;
var
a, b, c, d, m, n: integer;
begin
writeln('Введите числитель и знаменатель первой дроби:');
readln(a, b);
writeln('Введите числитель и знаменатель второй дроби:');
readln(c, d);
m := a * d; // Вычисление числителя
n := b * c; // Вычисление знаменателя
writeln('Результат деления:');
writeln('Числитель:', m);
writeln('Знаменатель:', n);
end.
```
Пояснение к программе:
1. В начале программы объявляем переменные `a`, `b`, `c`, `d`, `m` и `n` типа integer. Они будут использоваться для хранения введенных и расчитанных значений.
2. Затем, используя оператор `begin`, начинаем основную часть программы.
3. С помощью `writeln` выводим сообщение "Введите числитель и знаменатель первой дроби:". Затем с помощью `readln` считываем значения числителя и знаменателя первой дроби и сохраняем их в переменные `a` и `b`.
4. Повторяем те же действия для второй дроби. В первом `writeln` выводится сообщение "Введите числитель и знаменатель второй дроби:" и считываем значения числителя и знаменателя в переменные `c` и `d`.
5. После этого производим вычисления.
- `m` присваивается значение `a * d`, то есть произведение числителя первой дроби на числитель второй дроби. Это будет числитель результата деления.
- `n` присваивается значение `b * c`, то есть произведение знаменателя первой дроби на знаменатель второй дроби. Это будет знаменатель результата деления.
6. Затем, с помощью `writeln` выводим сообщение "Результат деления:", а затем выводим значения `m` и `n` (числитель и знаменатель) на новых строках.
7. В конце программы ставим точку. Это означает конец программы.
Таким образом, эта программа на языке Паскаль позволяет пользователю ввести две дроби в виде числителей и знаменателей, а затем вычислить и вывести результат их деления на экран.