Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Ястеб22
11.08.2022 19:02 •
Информатика
Составить программу вычисления суммы квадратов чисел от 1 до n.
Показать ответ
Ответ:
Aina2006
07.07.2020 16:00
Var i,x,n:integer;begini:=1;writeln('Vvedit N');readln(n);if n mod 2 = 0 then beginrepeatx:=i*i+x;i:=i+1;until i>n;endelse beginrepeatx:=i*i*i+x;i:=i+1;until i>n;end;writeln(x);readln;end.
0,0
(0 оценок)
Популярные вопросы: Информатика
TriPPPix
08.06.2022 21:13
Решите сотку не жалко дать...
zina0155
13.01.2020 03:21
Это устройство предназначено для хранения информации произвольного доступа. Является основным накопителем данных в большинстве компьютеров...
тата282
12.01.2023 11:28
Сынсыз желі дегеніміз не ...
Lis25pfi174
20.05.2020 14:22
1) (не) потревоженная тишина леса зач..ровывает и усп. каивает. 2) прозрачный воздух напоё..ый лесным ар..матом движется вверх. 3) птицы (не) пуга..ые человеком п..рзают (не) обращая...
оkсана06
20.05.2020 14:22
Какая семейная тайна во многом определила сознание достоевского?...
AlyonaAn
20.05.2020 14:22
Массив а вводиться с клавиатуры .вывести только нечетные элементы .размер произвольный .решение паскаль...
дильназ152
20.05.2020 14:22
Вкапилярах большого круга кровообращения происходит 1) превращение артериальной крови в венозную 2) обогащение крови кислородом, поступающим из тканей 3) поступление в кровь углекислого...
reshetnicova74
20.05.2020 14:22
Дайте характеристику типа круглые черви. заранее : 3...
MRI220
20.05.2020 14:22
Сочинить рассказ на тему нет лучшего дружка чем матушка моя на 10 предложений...
proadidas90
20.05.2020 14:22
Составьте развернутый план по теме: права и обязанности граждан....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота