Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
graincop
14.04.2022 09:46 •
Информатика
Написать программу, которая может решить следующую : найдите сумму квадратов n последовательных чисел от а до b. программа должна быть написана в pascal. заранее .
Показать ответ
Ответ:
polinayac
22.09.2020 01:03
Var
a, b, s, i: integer;
begin
s:=0;
readln(a);
readln(b);
for i:=a to b do
inc(s, i*i);
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
zvarichevgenija
18.08.2021 16:52
На каком рисунке изображена гистограмма?...
Alisa2853
15.06.2020 05:24
1. MS Excel программасын іске қосу жолдары?1-жолы.2. жолы3-жолы....
Markizka22
02.04.2023 08:49
Рекламный графический блок, помещаемый на web-странице и имеющий гиперссылку на сервер рекламодателя: выберите один ответ: a. тезаурус; b. домен; c. кластер; d. сайт; e. баннер;...
arkadikmxitary
27.07.2021 23:39
с эссе по литературе 100-150 слов...
bokovanatap08wlj
14.04.2023 03:56
Запишите лексическое значение 1-3 слов из толкового словаря В. И. Даля...
singarella123
26.01.2023 06:08
План описания страны ЧАД . 1.Название государства. 2.Столица государства. 3.Площадь государства . 4.Численность населения. 5.Положение государства на материке. 6. Положение государства...
nastya4431
05.05.2023 06:04
В урне содержится 8 желтых шаров, 4 черных и 5 зеленых. Определите вероятность того, что три шара будет извлечены в следующей последовательности: чёрный, зеленый, зеленый....
polishululyana
05.11.2020 10:23
В классе учатся 40 человек, Из них по русскому языку имеют тройки 19 человек, по математике 17 человек и по истории-22. Только по одному предмету имеют тройки по русскому-4человека,...
vlada362
02.01.2020 13:13
При постоянном давлении газ нагрели от 100 до 200 градусов цельсия. Найти начальный обьем газа, если его конечный обьем стал 3м^3...
lilyok2006
30.01.2020 15:57
6. Рассчитайте общий вес бруска с грузом для каждого опыта, результат внесите в таблицу....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, b, s, i: integer;
begin
s:=0;
readln(a);
readln(b);
for i:=a to b do
inc(s, i*i);
writeln(s);
end.