Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vasylyna946
01.04.2023 08:25 •
Информатика
Написать программу, которая вычисляет сумму первых n целых положительных четных чисел.
Показать ответ
Ответ:
nioniker
20.06.2020 17:55
Var n,i,k,s:integer;
Begin
write('n='); readln(n);
s:=0; k:=0; i:=2;
while k<n do
begin
s:=s+i;
k:=k+1;
i:=i+2;
end;
writeln('s=',s);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
irishkakrasa
25.05.2021 00:43
Вычислить и вывести все значения y по формуле y=8x для всех целых значений x от 1 до n...
Kkb194
15.10.2021 09:13
Дана точка М(x, y). Назначать z = 1, если точка находится внутри эллипса и z = 0, если точка находится вне эллипса. PascalABC...
Chocolateteapot0507
06.05.2022 08:41
Известно, что 152N=127N+1. Определите основание системы счисления значение числа N...
Roflobara
05.11.2020 06:19
Во время хакатона команда, в которой участвовала Маша, разрабатывала программное обеспечение для контроллера, управляющего тревожной сигнализацией в небольшом здании. Входные...
Radled
02.04.2021 13:27
6-тапсырма. Мәтінді талда. Төмендегі белгілермен әр абзацты немесе сөйлемдерді белгіле. Өз ойларыңды қорытындылап жаз. «V» «-» «+» «?» Бұрыннан білемін. Менің ойлағаныма қайшы,...
муслима18
23.10.2022 15:29
Оперотор шығарманың бірінші күні 28% екінші куні 20%-тергенде терілмеген 39 бет қалды. Шығарма да барлығы неше бет бар?...
русский132
23.06.2020 20:48
физика перышкин 8 класс 676, 677, 678, 679...
Аааааяяяяяннннн
08.01.2022 08:44
Сравнить 1 дес 4 ед 16ед...
lololololololololo11
08.06.2020 20:44
(7x - 54) + 32 = 160 меня убьют...
kozubyaka
16.03.2021 05:43
в маназин привезли 300кг морковки.из них 38% продали в первый день .сколько кг морковки продали в 1 день ?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
write('n='); readln(n);
s:=0; k:=0; i:=2;
while k<n do
begin
s:=s+i;
k:=k+1;
i:=i+2;
end;
writeln('s=',s);
End.