11класс
Страницы 116, 117, 118, 119 параграф 8 номер 10, ГДЗ по информатике за 11 класс к учебнику Босовой
Номер 10. Дано натуральное десятичное число n <= 32 000. Напишите программу, в которой:
1) из цифр данного числа формируется одномерный целочисленный массив;
2) определяются наибольшая и наименьшая цифры данного числа;
3) находятся сумма и произведение цифр, образующих данное число.
1) из цифр данного числа формируется одномерный целочисленный массив;
2) определяются наибольшая и наименьшая цифры данного числа;
3) находятся сумма и произведение цифр, образующих данное число.
const
n = 5;
var
a: array [1..n] of integer;
x, i, max, min, sum, pr, k: integer;
begin
write('Введи число >>');
readln(x);
//формирование массива из цифр числа
i := 1;
while x > 0 do
begin
a[i] := x mod 10;
x := x div 10;
i := i + 1
end;
//определение суммы и произведения
k := i - 1;//количество цифр в числе
sum := 0; pr := 1;
for i := 1 to k do
begin
sum := sum + a[i];
pr := pr * a[i]
end;
//определение max и min
max := a[1]; min := a[1];
for i := 2 to k do
begin
if a[i] > max then max := a[i];
if a[i] < min then min := a[i]
end;
Writeln('sum=', sum, ', pr=', pr, ', max=', max, ', min=', min);
end.
При выполнении программы надо учитывать, если среди чисел есть 0, то произведение будет 0.
