Нужна программа на Паскале? 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.
Двойной стеклопакет ( в окнах обычно) из за свойства воздуха плохо пропускать тепло и/или холод. надувной матрац использует свойство воздуха ( как и любого другого газа) заполнять все данное ему пространство . костер использует воздух как топливо для горения ( ракета то же самое что и костер только в несколько другом смысле ) а вертолет... ну при вращении винта создается воздушный поток ( как в обычном вентиляторе только направленному в землю ) который и поднимает винтокрылую машину в небо )))
Двойной стеклопакет ( в окнах обычно) из за свойства воздуха плохо пропускать тепло и/или холод. надувной матрац использует свойство воздуха ( как и любого другого газа) заполнять все данное ему пространство . костер использует воздух как топливо для горения ( ракета то же самое что и костер только в несколько другом смысле ) а вертолет... ну при вращении винта создается воздушный поток ( как в обычном вентиляторе только направленному в землю ) который и поднимает винтокрылую машину в небо )))
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.