Для делимости числа на 5 необходимо, чтобы последняя цифра числа была 0 или 5. Написать процедуру проверки делимости числа n, вводимого с клавиатуры, на 5. ( Паскаль )
Var n:integer; procedure delim(n:integer); begin if(n mod 5=0) then writeln('Делится') else writeln('Не делится'); end; begin writeln('Введите число'); readln(n); delim(n); end.
Спасибо огромное
только что такое delim ?
название процедуры, которую нужно было написать :)
Вы можете назвать ее как угодно, на свое усмотрение