Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
AnselmaRain
01.06.2023 11:21 •
Информатика
Даны натуральные числа n и k. найти ответ примера 1k + 2k ++ nk. в паскале
Показать ответ
Ответ:
mmmaaakkkaaarrr
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 оценок)
Популярные вопросы: Информатика
miha1lovkirill
10.04.2023 06:17
Определите значение в ячейке C4.полное решение ...
MAXIM3600
23.05.2022 15:18
Вот вам три подсказки - три ребуса. разгадав ребусы, вы правильно назовете города...
vasilyukandrey
02.06.2022 06:35
Составить программу, подсчитать количество положительных и количество четных элементов паскаль...
senia204
02.06.2022 06:35
Есть ли возможность в текстовом процессоре добавить одновременно несколько строк или столбцов?...
Mila672
23.08.2022 18:34
Пользователь программы вводит натуральное число N. Напишите программу, выводящую на экран первые N натуральных чисел, кратных 3 и выполняющую суммирование этих чисел....
Maruua1
29.06.2021 01:30
Вкакой системе счисления кодируется информация в компе !...
Abdurauf2004
29.06.2021 01:30
По каналу связи сообщения, содержащие только 4 буквы а т о м для передачи используется двоичные код, допускающих однозначно декодирование. для букв т о м используются...
Анкляка
24.09.2021 10:10
Введите число и вычитать из него по 0,5 до тех пор пока оно нестанет меньше 1...
AshesSpy
24.05.2022 21:51
Кто тут свеж? ? я всё ещё не понимаю, что означает выделенная часть. ...
elinazayka
21.06.2022 05:13
Написать программу в visual basic 6.0 буду...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s,k,n,i:integer;
begin
readln(n,k);
for i:=1 to n do
s:=(i*k)+s;
writeln(s);
end.