Регистрация
Kabesov
22.11.2020 20:49
Информатика
Есть ответ 👍

Уменьшение размеров устройств и увеличение их производительности-это...

105
197
Посмотреть ответы 2

Ответы на вопрос:

nmigutsa
nmigutsa
4,6(87 оценок)

Уменьшение размеров устройств и увеличение их производительности-это модернизация.

ногнео
ногнео
4,5(23 оценок)

var

    a, s, p : integer;

   

begin

    p : = 1;

    repeat a : = readinteger('введите 4-х значное число: ') until (a > 999) and (a < 10000);

    while a > 0 do begin    
 

        s += a mod 10;

        p *= a mod 10;

        a : = a div 10;

    end;

    writeln('сумма ', s);

    writeln('произведение ', p);

end.

Популярно: Информатика