Безотлагательно ПОМОГИТЕ ДАЮ ЗА Исполненье 77 БАЛЛОВ надо сделать в паскале

Безотлагательно ПОМОГИТЕ ДАЮ ЗА Исполненье 77 БАЛЛОВ надобно сделать в паскале программку: если число делиться на 5, то выведите целую часть от разделения

Задать свой вопрос
1 ответ

var

 n: Integer;

begin

 Write ('Введите число: ');

 ReadLn (n);

 if n mod 5 = 0 then         // проверка делимости на 5

   Writeln ('Целая часть от дробления на 5 = ', n div 5)  // вывод целой доли от разделенья

 else

   Write ('Число не делится на 5 без остатка');

end.


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


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

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

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

Войти на сайт