Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Mashatry
28.06.2020 03:30 •
Математика
Найти сумму всех n-значных чисел, кратных k(1< =n< =4) паскаль
Показать ответ
Ответ:
LadySmail
20.07.2020 01:51
Нужна программа на Паскале?
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.
0,0
(0 оценок)
Популярные вопросы: Математика
154Dance3
30.11.2021 23:57
7. Визнач, якому з графіків належить точка C(− − 1; 1). А у = –2х – 3; Б у = –2х + 3; В у = 2х + 3; Г у = 2х – 3; Д інший варіант відповіді. 9. Визнач, у яких точках графік функції...
MaryVasili
10.03.2023 03:27
При делении некоторого числа на 13 (ответ и задача прикреплены)...
alina090920031
14.09.2022 15:25
в школе 700 учеников среди них 371 мальчиков. сколько процентов учащихся этой школы составляют девочки....
daniil359
13.08.2020 12:27
оля гупила 30 мелков. каждый день она рисовала какими-то тремя из них. если она брала мелок пятый раз то она его выкидовала. в итоге все мелки были викинуты. за сколько дней?...
artemlis1302200
02.01.2020 21:02
( ) Изготовление блокнотов в типографии «Люкс» стоит 68 рублей за штуку, а доставка - 190 рублей. А в типографии «Некст» блокнотыизготавливают по 55 рублей за штуку, доставка...
Derve
26.04.2022 17:56
Найдите все целые значения n2 если 4 n 7...
sladkaezhka19
16.05.2021 11:15
На полянке собрались божьи коровки. Если у божьей коровки на спине 6 точек, то она всегда говорит правду, а если 4 точки - то она всегда лжет, а других божьих коровок на полянке...
Bdbdbbfbrhr
12.12.2021 03:03
Я не могу понять как делать...Если не сложно,напишите ответ сразу......
dianagatina04
29.05.2022 16:24
X+3y=-7 2x+15y=-17хелп...
артемий59
10.11.2020 02:47
Сколько будет 30*66 надо...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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.