Составьте программу, которая запрашивает числитель и знаменатель неправильной дроби и выделяет целую часть (с помощью оператора выбора case)

Например:

Числитель и знаменатель: 17 3

17/3=5 2/3

Программа на языке pascal:

Var x, y, ostatok:integer;

Begin

Writeln ('Введите числитель') ;

Readln (x) ;

Writeln ('Введите знаменатель') ;

Readln (y) ;

ostatok:=x mod y;

Writeln ('Дробь после выделения целой части: ', ostatok,'/', y) ;

End.