1. Информатика
  2. Написать программу в

Написать программу в паскале. задано натуральное число n. вычислить произведение цифр заданного числа.

Danyka47 Danyka47    3   01.09.2019 23:40    0

Ответы
Нюйва Нюйва  06.10.2020 10:42
Var
  n, i, p: integer;
 
begin
  p := 1;
  read(n);
  while n > 0 do
  begin
    p := p * (n mod 10);
    n := n div 10;
  end;
  write(p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
TheCool111 TheCool111  04.03.2021 21:58
В предложении Летом они торжественно расписались идущие подряд буквы образуют термин информатики. Найдите этот термин ​...
Яна116727 Яна116727  13.07.2019 09:40
Впрограмме описан одномерный целочисленный массив а, в представленном фрагмента программы обрабатываются элементы массива с индексами от 1 до 27. n: =27; a[1]: =3; for i:...
жека569 жека569  13.07.2019 09:40
Почему у меня не работает программа? program pr1; uses crt; begin clrscr; assing(f, data ); rewrite(f); for i: =1 to 10 do begin readln (a); write (f,a); end; readln; end....
vgfhdijubvn vgfhdijubvn  13.07.2019 09:40
Информатика/ какому логическому выражению соответствует условие: среди чисел x, y, z нет ни одного равного 0? 1)(z 0) and (x 0) or (y 0) 2) (x 0) or (y 0) or (z 0) 3)(x 0)...
ромашка261 ромашка261  13.07.2019 09:40
Вдвумерном массиве посчитать количество max элементов (паскаль) )...
dinamis05 dinamis05  07.03.2022 08:39
Выберите правильный записи условного оператора в Python if a 0: else: print(a)else:if a 0if a b:...
alyakozlova22 alyakozlova22  07.03.2022 09:11
Анализируем и сравниваем Сравни площадки для кегельринга и робо-сумо. Найди сходства и различия....
lenalatka lenalatka  07.03.2022 09:21
8_Тест «Общие сведение о языке программирования Паскаль» Вариант 2...
Typhoon01 Typhoon01  07.03.2022 09:21
Строчка while a 0: называется (в именительном падеже):...
катя10467743 катя10467743  07.03.2022 09:26
Составить программы: 1) вычислить значение выражения: z=2x+3y; 2) вычислить площадь треугольника, если известны высота и основание треугольника. Составить программы: 1) вычислить...

Популярные вопросы