Составить программу Pascal : Найти произведение цифр заданого 3х значного числа . - №1484050

Составить программу Pascal :
Найти произведение цифр заданого 3х значного числа .
- Предмет:
  Информатика
- Автор:
  sassafras
- 6 лет назад

Ответы 1

var

a : integer;

begin

read (a);

writeln ((a mod 10) * (a div 100) * (a div 10 mod 10));

end.
- Автор:
  yaritzaclay
- 6 лет назад
- 0
Добавить свой ответ

Еще вопросы

Чем можно объяснить тот факт,что несмотря на рост строительных мощностей,СССР в 1984 г. построил столько же квартир,сколько в 1960?
- Предмет:
  История
- Автор:
  cali87
- 6 лет назад
- Ответов:
  
  1
- Смотреть
До кожного з іменників добери виражене прикметником означення. Утворені словосполучення запиши. Назви, до якого словника потрібно звернутися в разі утруднення з визначенням роду.
Рукопис, туш, собака, степ, шампунь, магістраль, Сибір.
- Предмет:
  Українська мова
- Автор:
  delilah
- 6 лет назад
- Ответов:
  
  1
- Смотреть
Составить программу Pascal:
Проверить , кратно ли 2 сумма двух натуральных чисел .
- Предмет:
  Информатика
- Автор:
  aliyahlyzs
- 6 лет назад
- Ответов:
  
  1
- Смотреть
при каком значении а выражение 2/(а-1)2+6 достигает своего наибольшего значения? А)1/3 Б)1 В)-1 Г)0
- Предмет:
  Алгебра
- Автор:
  alexiaaguilar
- 6 лет назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years