Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
PisarenkoEV1
16.09.2022 23:37 •
Информатика
Найти сумму квадратов всех натуральных чисел от 1 до 100
Ответ:
Шамиль1233
03.10.2020 07:48
Var i,n : Integer;
Begin
n:=0;
For i:=1 to 100 do n:=n+sqr(i);
Writeln(n);
end.
Результат: 338350
0,0
(0 оценок)
Популярные вопросы: Информатика
St151
06.07.2022 18:35
Кто ввел термин бит 1) Альберт Эйнштейн2) Вернер Бухгольц3) Бил Гейтс...
Лилиябелая
06.07.2022 18:35
Дайте определение Голосовой ввод текста на компьютере...
саша240904
26.09.2022 02:39
Какие файлы можно изменять или удалять 25...
13913
13.06.2021 00:03
Паскаль даны 40 квадратов. найти их площади, если стороны вводятся в компьютер. как решать?...
Котик505мяу
13.10.2022 17:10
1.Наведіть приклади інформаційних процесів. 2.Наведіть приклади опрацювання повідомлень людиною. 3.Наведіть приклади опрацювання повідомлень автоматичними пристроями. 4.Розкажіть,...
mihailsokolenk
22.09.2021 05:16
Приведи в соответствие. ИнтернетПрограмма, предназначенная для просмотравеб-сайтов.ЛоготипИнформация, обусловленная необходимостьюВ ПОВседневНОЙ ЖИЗНИ.БраузерТоварный знак компании,...
Katiadimova3
09.11.2020 09:59
1. Составить алгоритм и блок схему нахождения суммы S=3^2 + 5^2 + 7^2 +… +15^2...
tanya2017kazanova
28.06.2020 13:42
a , parta , мектеп” дегендер қандай типке жатады?...
nestarenko7ozgxln
19.08.2020 05:16
Желательно с фото и пояснением...
drxayala1
14.12.2022 22:00
Чем современый человек отличается от древнего...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Begin
n:=0;
For i:=1 to 100 do n:=n+sqr(i);
Writeln(n);
end.
Результат: 338350