Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Милкаi
03.12.2022 22:42 •
Информатика
Напишите в паскале программу на нахождение суммы чисел арифметической прогрессии с 50 по 150 член, если a1=1, d=0,6. формула арифметической прогрессии sn=(a1+an)*n/2. нужно. заранее .
Показать ответ
Ответ:
leradorozhnyak
09.09.2020 01:54
Var
a1,d:real;
Begin
Write('a1 = ');ReadLn(a1);
Write('d = ');ReadLn(d);
WriteLn('S(150) - S(50) = ',(2*a1+d*149)*75-(2*a1+d*49)*25);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
sadpepeee
19.05.2020 14:57
99 ! после преобразования растрового 256-цветного графического файла в черно-белый формат (2 цвета) его размер уменьшился на 7 кбайт. каков был размер исходного...
Vikof
13.08.2022 08:10
Кузнечик анна раздумывает, куда ей пойти в свой выходной. с одной стороны, хочется погулять в парке, который находится на точке 24, с подружками. с другой стороны,...
liliyazaleeva12
21.01.2021 07:22
Вычислить объём видеофайла длительностью 20сек скоростью смены кадров равной 25 кадров в секунду. разрешение 768 на 576 , разрядность цвета 8бит , объемом звуковой...
nikitakyznecov703
30.06.2020 11:28
Объём видеопамяти равен 2,5мбайт. какова может быть максимальная глубина цвета для монитора с разрешением экрана 1280 на 1024 точки?...
666Luc666
14.12.2022 09:01
Во дворе гуляли четыре подружки, которые очень любили кататься на велосипедах. Все знали, что девочки могут кататься 20, 50, 70, 100 минут. Нина могла кататься не...
123gordeev
02.06.2023 19:56
Название инструмента редактирования .А) Выбор.В) Компонент.С) Палитра.D) Инструмент для увеличения.Е) Ввод текста.3. Название инструмента редактирования .А) Рулетка.В)...
Hdjshddh
22.02.2020 23:56
2. Рассмотрите и заполните таблицу. Прочитайте примеры, определите источник и приемник информации.ИсточникПриемникПримерУченик изучает картины в музееУченик получил...
mishazzzzz
28.04.2023 18:08
Вариант № 5 1. Заполните недостающие данные Кбайт : байт = 20480бит 2. Определите информационный размер текстового документа, если он записан с 1024-символьного...
Анастасия54546
15.05.2020 12:45
Проверить, имеется ли в данном одномерном массиве хотя бы одна пара чисел, совпадающих по величине. нужна блок схема и код на с++ либо питон...
Anasteysha4002
17.12.2020 21:28
Получено сообщение: ВАППАПААПМАП. В нем указаны все символы используемого алфавита. Определите информационный объем полученного сообщения....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a1,d:real;
Begin
Write('a1 = ');ReadLn(a1);
Write('d = ');ReadLn(d);
WriteLn('S(150) - S(50) = ',(2*a1+d*149)*75-(2*a1+d*49)*25);
End.