Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Помогите по информатике,нужно на паскале!
Дано 2 целых числа а и b.Написать слово "делится",если a/b без остатка,в противном случае написать "не делится".

Ответ оставил Гость

Var
a, b: integer;
begin
readln(a, b);
If a mod b <> 0 then
writeln(Не делится)
else 
writeln(Делится);
end.