Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
gornovayaveron
13.09.2020 02:03 •
Информатика
Найти сумму квадратов чисел от m до n. паскаль
Ответ:
NeonMax
02.10.2020 04:28
Var s,i,m,n:integer;
begin
readln(m,n);
for i:=m to n do
s:=s+sqr(i);
writeln('summa:',s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
yyeyheh
07.09.2020 11:52
Решить .сколько символов содержит сообщение,записанное с 16-ти символьного алфавита,если объём составил 1/16 часть мегабайта....
катя4003
30.09.2020 15:24
Какую входную информацию следует обработать,чтобы: а)вычислить площадь прямоугольника; б) принять решение о покупке новой модели мобильного телефона; в) сделать на уроке...
teyachichinadze1
24.06.2020 14:05
Дан одномерный массив целых чисел. найти сумму всех четных элементов массива, стоящих на четных местах (имеющих четные номера). массив задается с генератора случайных чисел....
35глис
16.10.2022 03:40
В чем ошибки и как их исправить...
Настюшка575
13.08.2020 18:31
Для каких из указанных значений числа Yистинно высказывание:(Y 10) И (Y 15) И (Y≠12)1)132)103)144)12...
snejanaterg
09.06.2022 06:19
Что изображена на картинке? 1.форма 2.отчёт 3.за...
katabelja
11.04.2023 16:05
В системном блоке компьютера находятся: а) процессор, внутренняя память, CD-ROM, контроллеры внешних устройств, блок питания б) процессор, внутр. память, дисковод, сканер,...
Мунира1306
09.06.2020 11:28
решите с подробным решением. ...
Soniadesor
06.01.2022 04:42
Какой мне фильм посмотреть новогодний кроме один дома кто напишет этот фильм того юлокк...
26nn
19.11.2022 14:52
Укажите безличное предложение. А) Просеки лесных дорог, заглядевшихся в озера. Б) Цветите, юные! В) Без труда не вынеть и рыбку из пруда. Г) Как много думано, исполнено так...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(m,n);
for i:=m to n do
s:=s+sqr(i);
writeln('summa:',s);
end.