Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
debdh
06.10.2021 05:28 •
Информатика
Дан ряд чисел 1,3,5, найти среднее арифметическое первых n чисел и максимальный элемент) написать программу на языке pascal
Показать ответ
Ответ:
tyuliganova
31.07.2020 19:44
Var n,i,s:integer;
begin
read(n);
s:=-1;
for i:=1 to n do begin
s:=s+2;
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
РешОрше
08.04.2020 21:01
На уроке физики учитель предложил ребятам дома провести эксперимент, который наглядно продемонстрирует ответ на во Имеет ли воздух вес?». Для эксперимента требуются два...
DarkWolfe2017
29.03.2022 08:15
Селектор класының дұрыс атауы?(CSS)? 1)class1 2)*class 3)++dass 4)dass1 Кайсысы осылардын?...
Kov3456
02.02.2020 03:14
Як виконуються алгоритми з вкладеним циклом?...
Elizkap01
15.04.2020 15:57
SOS мне нужна от тех кто владеет языком PASKAL кто первый тот топ и мой друг!...
кристина2161
28.11.2022 16:10
Дана таблица а[1: 100] найти количество элементов этой таблицы, больших среднего арифметического всех ее элементов...
Марина2808
27.02.2021 04:35
Производительность работы компьютера(быстрота выполнения операций зависит от:...
pavelniyazov
27.02.2021 04:35
Ычислите информационный объем предложения если используется кодировка юникод...
klubnichka10
13.04.2021 10:04
1. Что такое робо-сумо? 2. Какой бывает площадка для робо-сумо?3. Как появилось соревнование робо-сумо?...
PapayaS
07.12.2021 06:48
Ребята . Напишите программу которая считывает три числа и выводить их сумму...
marta894
11.05.2023 20:01
На рисунке точки a,e,c и f лежат в плоскости альфа.а точка b не лежит в плоскости альфа.а точка в не пренадлежит альфа.постройте точку пересечения прямой еф с плоскостью...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
read(n);
s:=-1;
for i:=1 to n do begin
s:=s+2;
end;
writeln(s);
end.