Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
dashanovikova03
15.08.2021 16:54 •
Информатика
Составит программу, которая вычисляет сумму первых n(ввести с клавиатуры) четных чисел pascalabc
Показать ответ
Ответ:
sychewaya8310
04.10.2020 08:53
// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
var n:=ReadInteger('n=');
Writeln('s=',2.Step(2).Take(n).Sum)
end.
Пример
n= 5
s=30
0,0
(0 оценок)
Популярные вопросы: Информатика
киса2248
29.04.2021 11:30
Информатика 6 клас у наведеному программному коді назвіть заголовок функції,тіло функції оператор виклику функц...
artumko04
13.09.2021 21:33
Ержану необходимо прочитать книгу из N страниц. В первый день он прочитал 5 страниц. Каждый последующий день он читает в два раза больше страниц, чем в предыдущий. За...
gangsta288
18.07.2020 18:57
Для чего нужны две последние команды вс алгоритмов...
АнальныйЧервь
11.11.2022 05:50
Найдите соответсвие Информатика...
Dinobot774
17.10.2021 03:36
Какими командами создать диалог в...
dariamisskapri
07.02.2020 15:10
Выведите на экран натуральные числа на экран в диапазоне с 57 до 96 последовательно через запятую программу сделать в паскале...
алинка546
07.02.2020 15:10
Решить : пять домов стоят вдоль дороги, один за другим. 1. доцент живёт в красном доме. 2. гробовщик держит собак. 3. сантехник пьёт чай. 4. зелёный дом слева от белого....
sasha3637
17.03.2021 16:30
Заданы два числа. напишите программу для нахождения частного этих чисел. округлите результат до десятых, оставив в дробной части одну цифру....
temka2013
17.03.2021 16:30
Запиши десятичное число 1235 в системе счисления с основанием 6....
ruslanasd94rus
05.01.2021 09:52
Файл размером 8 кбайт передается через некоторое соединение за 64 секунд. определите, за сколько секунд можно передть тот же файл через соединение, скорость которого...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var n:=ReadInteger('n=');
Writeln('s=',2.Step(2).Take(n).Sum)
end.
Пример
n= 5
s=30