Ввести число. Если число кратно 4, то к его разделить на 4



vera.makarenko.2001@mail.ru в категроии Информатика, вопрос открыт 20.05.2017 в 12:04



Анна , ответ добавлен 20.05.2017 в 12:22

Var
a:integer;

begin
readln(a);
if (a mod 4 =0) then
a:=a div 4;
writeln(a);
end.

0

Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.

1 ответ