Предмет: Информатика, автор: Катя20007

Нарисуйте блок схему:
var N, product: longint;
digit: integer;
begin
readln(N);
product := N mod 10;
while N >= 10 do
begin
digit := N mod 10;
product := product*digit;
N := N div 10;
end;
writeln(product);
end.

Катя20007: хз

valgrisa: что программа должна делать?

Катя20007: Требовалось написать программу, при выполнении которой с клавиатуры считывается
натуральное число N, не превосходящее 109
, и выводится произведение цифр этого числа.
Программист торопился и написал программу неправильно.

Катя20007: 10 в 9 степени*

Катя20007: Последовательно выполните следующее.
1. Напишите, что выведет эта программа при вводе числа 532

Катя20007: но это все не важно мне главное блок схема

valgrisa: тогда нормально, что программа кривая )

Катя20007: А ты можешь свой вк дать? чтобы я если что к тебе обращалась? не за бесплатно конечно

valgrisa: нет

Катя20007: :(