Ответы на вопрос:
Нужна программа на паскале? program zadacha; var s,k,n,p,i: integer; begin s: =0; p: =1; readln(n,k); for i: =1 to n do p: =p*10; for i: =trunc(p/10) to p-1 do if i mod k=0 then s: =s+i; write(s); end.
Популярно: Математика
-
Nora369809.05.2021 23:11
-
sofia345124.03.2023 22:19
-
rayyana1410.04.2022 03:37
-
lol104601.07.2020 16:35
-
kiska51028.09.2021 01:13
-
Scipelex7609.03.2021 06:38
-
iluza304.01.2022 11:05
-
bertain24.01.2020 08:51
-
1649fn4920.08.2022 23:25
-
1508221.07.2021 12:05