Дано число. Если оно не делится на 5, то прирастить

Дано число. Если оно не делится на 5, то прирастить число в 5 раз, в противном случае уменьшить число в 5 раз.

Задать свой вопрос
1 ответ
Program Znanija;
var a:integer;
begin

readln(a);

if a mod 5 = 0 then
writeln(a / 5)
else
writeln(a * 5);

end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт