Вопрос по информатике:
Дано пятизначное число. найти сумму первой, третьей ,пятой цифр произведение второй и четвертой
- 11.09.2016 04:02
- Информатика
- remove_red_eye 16643
- thumb_up 41
Ответы и объяснения 1
// Pascal ABC.NET
var
n, digit : integer;
mult : integer := 1;
sum, count : integer;
begin
readln(n);
while n 0 do begin
digit := n mod 10;
inc(count);
if count mod 2 = 1 then
sum += digit
else
mult *= digit;
n := n div 10;
end;
writeln('Summa is ', sum);
writeln('Multiplication is ', mult);
end.
- 12.09.2016 13:52
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.