Задать вопрос
23 сентября, 18:43

Дано целое число. Если оно кратно 5, увеличить его в 2 раза, если нет - уменьшить на 5.

+4
Ответы (1)
  1. 23 сентября, 20:16
    0
    предлагаю решение на Паскале

    var n: integer;

    begin

    read (n) ;

    if (n mod 5) = 0 then n:=n*4

    else

    n:=n-25;

    writeln ('n=', n) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано целое число. Если оно кратно 5, увеличить его в 2 раза, если нет - уменьшить на 5. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Задача на Паскале. Дано число, если оно кратно 3 (трем) - увеличить его на 5, если кратно 2 (двум) - увеличить в 4 раза, если не кратно - увеличить на 1. * Использовать функцию "остаток от деления равен нулю".
Ответы (1)
Дано число. Если оно делится на 11, то уменьшить ч Дано число. Если оно делится на 11, то уменьшить число в 11 раз, в противном случае уменьшить число на 11. исло в 11 раз, в противном случае уменьшить число на 11.
Ответы (1)
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
Дано целое число. Если оно кратно 5, то вывести на экран сообщение: "Да" и уменьшить число в 5 раз. В противном случае вывести на экран сообщение "Нет" и при этом число увеличить в 5 раз.
Ответы (1)
Дано целое число n увеличить число в 4 раза если число кратно 5 иначе уменьшить на 25
Ответы (1)