Помогите по информатике,нужно ** паскале! Дано 2 целых числа а и b.Написать слово...

Question

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

Answer 1

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