Если число заканчивается на 2 или 3, то исходное число умножить на число десятков в нем, если число единиц от 7 до 9, то из числа вычесть сумму цифр числа, в противном случае отбросить последнюю цифру. Pascal

21 Фев 2020 в 19:41
122 +1
0
Ответы
1

Пример на языке программирования Pascal:

program NumberOperations;
var
number, units, tens, sumDigits: integer;
begin
write('Введите число: ');
readln(number);
units := number mod 10;
tens := number div 10;
sumDigits := (number div 100) + (number mod 100) div 10 + (number mod 10);
if (units >= 7) and (units <= 9) then
number := number - sumDigits
else if (units = 2) or (units = 3) then
number := number * tens
else
number := number div 10;
writeln('Итоговое число: ', number);
end.

Эта программа принимает целое число от пользователя, выполняет нужные операции в соответствии с условиями задачи, и выводит итоговое число.

18 Апр 2024 в 16:57
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир