Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
123QWE123QWE12345678
18.11.2020 06:31 •
Информатика
Вычислить сумму квадратов чисел от одного до n
Показать ответ
Ответ:
kuku2288
24.07.2020 21:00
Var i, n: integer; sum: longint;
begin
sum:=0;
readln(n);
for i:=1 to n do inc(sum, i*i);
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
anastasanesvido
08.02.2021 18:30
Дан целочисленный массив а(). нужно получить массив в изменяя массив а так,чтобы все отрицательные числа в массиве в были равны 0,а все положительные 1....
evgeniaberezka
16.01.2023 03:19
Паскаль! дан целочисленный массив. отсортировать массив по убыванию,начиная с максимального элемента...
Darima111
23.04.2023 00:52
Найдите основание системы в корой сделано умножение 3*213=1043...
Arina8411
23.04.2023 00:52
Напишите программу для паскаля для перестановки максимального и минимального по значению элементов массива. значения длины массива вводятся с клавиатуры...
nemkovvlad1
26.05.2023 05:55
Напишите программу, которая по введенной дате выводит на экран название праздника (01.01 - новый год, 08.03 - международный женский день и т. ввод непраздничной...
kotov657
05.12.2022 20:25
Напишите программу, которая считывает строку-разделитель и три строки, а затем выводит указанные строки через разделитель. Python сайт stepik...
Julieta11
06.08.2021 02:28
программирование на языке Паскаль ввести три числа найти их сумму и произведение напримервидите три числа4 5 74+5+7=164×5×7=140...
Fhh72
23.03.2020 02:17
Дан алгоритм в виде блок-схемы. запишите его на алгоритмическом языке....
Асият27
13.09.2022 23:49
Книга 900 стр на каждой странице 52 строки в каждой строке 50 символов каждый символ = 2 байта определите информационный вес книги в мегабайтах...
BrenderMaster
15.09.2020 21:16
Ақпаратты шифрлау және құқығы арасындағы байланыс туралы эссе жазыңдар. көмектесіндерш...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
sum:=0;
readln(n);
for i:=1 to n do inc(sum, i*i);
writeln(sum);
end.