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