Напишите программу, которая вводит с клавиатуры три числа, и находит их сумму и произведение. (на языке Паскаль)
120
170
Ответы на вопрос:
var n, sum, mult: integer;
begin
write('Enter number: ');
readln(n);
sum := 0;
mult := 1;
while n > 0 do begin
sum := sum + n mod 10;
mult := mult * (n mod 10);
n := n div 10
end;
writeln('Sum of digits = ', sum);
writeln('Multiplication of digits = ', mult);
readln
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
sprinter9927.10.2021 17:29
-
Nikstone04.09.2020 06:18
-
apajcheva06.07.2020 07:43
-
Bogdan30070729.01.2022 02:14
-
sibbb01.05.2020 17:35
-
Ponny130.10.2021 12:35
-
педро22811.08.2022 13:38
-
SemyaTanya22.03.2023 12:51
-
isakdzhanova04.08.2022 21:17
-
alextrasted28.12.2020 12:23
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.