Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
lavika1
16.05.2022 13:34 •
Информатика
Даны натуральные числа n и k. найти ответ примера 1k + 2k ++ nk. в паскале
Ответ:
alinakim3
17.07.2020 13:52
Var
s,k,n,i:integer;
begin
readln(n,k);
for i:=1 to n do
s:=(i*k)+s;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kanayevasaniya
04.06.2020 08:52
Домашнее задание: 73. В переменную строкового типа вводят слово, заканчивающееся цифрой. Увеличить эту цифру в 5 раз 74. В переменную строкового типа водят сслово, заканчивающееся...
Tytiki
31.01.2022 22:17
Составьте программу, которая выводит квадрат этого числа, если оно отрицательное или корень квадратный из этого число, если оно положительное. Pascal...
Alla11111111111
30.08.2020 04:09
Напишите программу вычисления функции f(x)=|x|...
вит39
15.04.2020 18:33
В чем смысл обменов , опустошений души у героев повестей Ю.Трифонова?...
sladkoe102
15.04.2020 18:33
відокремлений додаток; 2 відокремлене означення; 3 відокремлена прикладка; 4 уточнювальна обставина часу. А Тихі, ніжні зорі спадали з неба─ білі непрозорі… Б Він стояв,...
arm21
15.04.2020 18:33
{4x-5 x+1{3x+1 4x-2...
aresu
04.04.2022 20:16
Найди, кто из перечисленных животных имеет замкнутую пищеварительную систему...
dstepin17
04.04.2022 20:16
Какое число нужно поставить вместо звёздочи (*) в формуле линейной функции y=−9x+∗, чтобы график этой функции пересекался с осью Оу в точке (0; -3)...
ernarsailaubek
04.04.2022 20:16
найдите число род падеж другое мне его эту себя это своим ты этого такие ему...
Mia871
04.04.2022 20:16
Будласка зробить ці 3 завдання я дуже деже...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
s,k,n,i:integer;
begin
readln(n,k);
for i:=1 to n do
s:=(i*k)+s;
writeln(s);
end.