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



[email protected] в категроии Информатика, вопрос открыт 20.05.2017 в 16:04



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

Var
a:integer;

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

0

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

1 ответ