Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
likaKiss1
30.01.2022 09:10 •
Информатика
Найти сумму 10 членов арифметической прогрессии a,a+d,a+ а - первый член прогрессии,d - постоянное слагаемое, разность прогрессии.паскаль
Показать ответ
Ответ:
M4xL1ght
15.09.2020 15:29
Var
a,d,s,i:integer;
begin;
readln(a);
readln(d);
for i:=0 to 9 do
s:=s+a+d*i;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
AndreyDixord
29.11.2022 22:04
Сообщение на тему хранение передача и обработка информации Заранее...
kURGA
01.02.2022 22:46
Запиши развёрнутую запись числа 0,154 для дробной части числа....
фирузаалиева
27.05.2022 18:59
Позначте дії,для виконання яких доцільно використовувати табличний процесор Виконання обчислень Опрацювання малюнків Створення презентацій Відправляння електронних...
dashkin21
22.11.2022 07:03
Выбери правильную команду присваивания. Ж:=9; D:=9; D=9; Ж=9; D=:9;...
Lera6807
30.01.2020 14:08
В каком из условных операторов допущена ошибка? *1) if b=0 then writeln(‘Деление невозможно.’);2) if a b then max:=a else max:=b;3) if (a b) and (b 0) then c:=a+b;4)...
1234567890ваня
23.03.2020 11:53
Три программы в паскале: вычислить арифметические выражения. При этом выбрать такую форму записи, чтобы количество «медленных» операций (умножение, деление) было сведено...
Aleksa413
21.04.2021 20:20
ПРАКТИЧЕСКИ ЗАДАНИЯ ТОЖЕ НААИШИТЕ КАК ДЕЛАТЬ ААААААААА Я НЕ ПОНИМАТЬЬ КАК ЭТО ДЕЛАТЬЬ...
Пааапртоо
16.10.2022 01:33
Задание 4. Массив содержит значения отметок 22 учащихся класса за контрольную работу (случайные числа от 2 до 10). После работы над ошибками учащиеся переписали работу...
botuchenyy
31.10.2022 15:01
Выберете лишнее из списка .jpeg .bmp .txt .gif...
araitokbasova
30.06.2022 21:45
запишите число в естественной форме: 2,9370011E-2...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,d,s,i:integer;
begin;
readln(a);
readln(d);
for i:=0 to 9 do
s:=s+a+d*i;
writeln(s);
end.