Ответ: Я так понимаю вам нужна программа на Паскалеprogram zadacha;var s,k,n,p,i:integer;begins:=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.
Найти сумму всех n-значных чисел, кратных k (1 ≤ n ≤ 4).
Кумир. Помогите, срочно надо! — Правильный ответ на вопрос найдете ниже
13.01.2020 · 1