ПОМОГИТЕ РЕШИТЬ, НА ЛАБЕ СИЖУ!!! Определить делится ли на целое число х целое число у без остатка. Если делится, то разделить х на у и вывести его. В турбо паскале програмку написать.
Program del; var x, y: integer; d: real; begin read(x); read(y); if x mod y = 0 then d:= x/y; write (d); end.
Можешь вторую решить?
давай попробую