4человека стоят у лифта пятиэтажного дома.все они живут на разных этажах,от второго до пятого. лифтёр - id837743120220809 от tinaZ07 09.08.2022 07:54

Question

Информатика: 4человека стоят у лифта пятиэтажного дома.все они живут на разных этажах,от второго до пятого. лифтёр хочет доехать до одного какого-нибудь этажа,а там пусть жильцы идут пешком.спуститься на один этаж-неудовольствие,подняться на один этаж-двойное неудовольствие.на каком этаже надо остановить лифт,чтобы сумма неудовольствий была наименьшей

tinaZ07 · Accepted Answer

Var
n, a, b, c, d, s, p: integer;

begin
Write('Введите натуральное четырехзначное число: ');
Readln(n);
if (n > 9999) or (n < 1000) then Writeln('Число должно быть четырехзначным')
else begin
    a := n div 1000; d := n mod 10; n := (n div 10) mod 100;
    b := n div 10; c := n mod 10;
    s := a + b + c + d;
    p := a * b * c * d;
    Writeln('Сумма цифр равна ', s, ', а их произведение равно ', p)
end
end.

Тестовое решение:
Введите натуральное четырехзначное число: 2345
Сумма цифр равна 14, а их произведение равно 120

MOGZ ответил