Question

1. Составьте алгоритм вычисления суммы квадратов цифр,заданного трехзначного числа. 2.Составить алгоритм вычисления разности кубов цифр, заданного восьмизначного числа.3. Для заданного действительного числа К вычислить значение произведения (99/k^3-98)*(97/k^3+96)*(95/k^3-94)*...*(3/k^3+2)

Answer 1

1. var a,s:integer;
begin
writeln ('введи 3-значное число');
readln (a);
if (a>99) and (a<1000) then begin
while a>0 do
begin
s:=s+sqr(a mod 10);
a:=a div 10;
end;
writeln (s);
end else writeln ('Ошибка ввода');
end.

2. var a,s,k:longint;
begin
writeln ('введи 8-значное число');
readln (a);
if (a>9999999) and (a<100000000) then begin
while a>0 do
begin
k:= a mod 10;
s:=s-k*k*k;
a:=a div 10;
end;
writeln (s);
end else writeln ('Ошибка ввода');
end.

Answer 2

1. Алгоритм вычисления суммы квадратов цифр трехзначного числа: a. Задать трехзначное число. b. Разделить число на 100, чтобы получить первую цифру (сотни). c. Вычислить остаток от деления числа на 100, чтобы получить двузначное число. d. Разделить двузначное число на 10, чтобы получить вторую цифру (десятки). e. Вычислить остаток от деления двузначного числа на 10, чтобы получить последнюю цифру (единицы). f. Возвести каждую из цифр в квадрат и сложить результаты. g. Полученную сумму вернуть в качестве результата.

2. Алгоритм вычисления разности кубов цифр восьмизначного числа: a. Задать восьмизначное число. b. Разделить число на 1000000, чтобы получить первые две цифры (миллионы). c. Вычислить остаток от деления числа на 1000000, чтобы получить шестизначное число. d. Разделить шестизначное число на 10000, чтобы получить две средние цифры (тысячи). e. Вычислить остаток от деления шестизначного числа на 10000, чтобы получить четырехзначное число. f. Разделить четырехзначное число на 100, чтобы получить две последние цифры (сотни). g. Вычислить остаток от деления четырехзначного числа на 100, чтобы получить двузначное число (десятки и единицы). h. Возвести каждую из цифр в куб и вычислить разность между полученными результатами. i. Полученную разность вернуть в качестве результата.

3. Алгоритм вычисления значения произведения для заданного действительного числа K: a. Инициализировать переменную "произведение" со значением 1. b. Начать цикл с i = 99 и продолжать, пока i >= 3.

   • Умножить "произведение" на ((i / K)^3 - (i - 1) / K^3).
   • Уменьшить i на 2. c. Вернуть полученное значение "произведение" в качестве результата.