В паскале дано число, если оно кратно 5,то умножить его на 10. Написать программу.
В паскале дано число, если оно кратно 5,то умножить его на 10. Написать программу.
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program MultipleByFive;
var
number: integer;
begin
writeln('Enter a number: ');
readln(number);
if number mod 5 = 0 then
begin
number := number * 10;
writeln('The number is a multiple of 5, so it is multiplied by 10: ', number);
end
else
writeln('The number is not a multiple of 5');
end.