Для каждого четырёхзначного числа из диапазона от A до B включительно  (

Для каждого четырёхзначного числа из спектра от A до B включительно
( Alt;B)нужно отыскать творение средних разрядов (сотки, 10-ки), и вычислить сумму этих творений.
Например, если на вход программки подать A=1234 и B=1236, обязано быть выведено 18.

Задача: Выполнить данную программку для A=1234 и B=9876. Это ответ 1.
Выполнить данную программку для A=4321 и B=5555. Это ответ 2.
Выполнить данную программку для A=2222 и B=7667. Это ответ 3.
В качестве конечного результата найдите сумму всех трёх ответов.

Задать свой вопрос
Антонина Олонцева
с помощью какой проги исполнять?
Надя Жетвина
pascal
Таисия Касименко
ты точно полностью написал условие?
Несук Амелия
Для каждого четырёхзначного числа из спектра от A до B включительно (A
1 ответ
Program enot;
Var i,a,b,n,f,g,v,p,s,c,j:integer;
x: array[1..9999] of integer;
begin
read(a,b);
n:=b-a+1;
for i:= a to b do
begin
x[i]:=i;
for j:= a to b do
 begin
c:=j div 10;
V:=c mod 10;
f:=c div 10;
G:= f mod 10;
p:= v*g;
end;
s:=s+p;
end;
writeln(s);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт