Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Стася911
29.06.2021 23:24 •
Информатика
Найти сумму квадратов всех натуральных чисел от 1 до 100 написать программу
Ответ:
Response21
08.10.2020 15:40
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
1.To(100).Select(t->t*t).Sum.Println
end.
Результат
338350
0,0
(0 оценок)
Популярные вопросы: Информатика
suskoahdvej5
30.03.2020 02:27
1) информационный объем сообщения, записанного в 16-битовом коде unicode, составляет 12 кбайт. сколько страниц занимает это сообщение, если известно, что на каждой странице...
Alekseev709
21.11.2020 14:02
Зная количество детей в семье определить её общественный статус (обычная тли многодетная)....
Anna66613
21.10.2020 21:47
Как называлось и где возникли древнейшие индийские города...
Vlab36534
04.07.2020 13:09
Из перепутанных слогов составь имена сказочных героев. кто из них был учителем в волшебной школе? 1) росматкин2)бигонби3)кинлюльпи4)делсакинмо5) тиранобу...
Uchenick2002goda
10.08.2022 06:06
Решить уравнение 25- x во второй степени = 0...
20H
14.11.2020 11:02
Какие качества характера чехова?...
34Марго35
10.02.2022 17:24
Подскажите ,заранее поэма гомера илиада настоящие и вымышленные герои...
Емаилком002
10.02.2022 17:24
38 негізгі ақпараттар и жанама ақпараттар...
андрюха87
02.09.2022 03:12
Выморите орфографический разбор слова грустно...
12ал12ён12на12
23.10.2020 12:12
Функции науки(расшифровка каждой кратко)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
1.To(100).Select(t->t*t).Sum.Println
end.
Результат
338350