Ответы на вопрос:
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.
Популярно: Информатика
-
maksosipow14.09.2022 09:08
-
Dasha931655103.09.2022 22:09
-
слав455229.11.2020 17:44
-
shvok11.12.2021 18:05
-
Lol1111111100011.07.2022 15:54
-
пипл409.07.2022 05:37
-
klimenkovlad59814.05.2020 09:16
-
xxx563915.03.2020 10:54
-
super1234516703.03.2021 14:38
-
smolekovmax14.07.2021 12:19