Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
airfgh
03.03.2023 15:24 •
Информатика
Программа в pascalabc.net. вычислить сумму квадратов чисел первой сотни.
Показать ответ
Ответ:
irina0208ga
08.10.2020 11:09
Vara,s:integer;begins:=0;a:=1;while a<>100 do begins:=s+(a*a);write(s,',');a:=a+1;end;end.
0,0
(0 оценок)
Ответ:
shamilovaam
08.10.2020 11:09
Program SummaKv;
var
n, i: integer;
begin
n := 0;
for i := 1 to 100 do
n := n + sqr(i);
writeln('Сумма квадратов первой сотни чисел = ', n);
end.
Здесь квадрат числа 100 так же включается в сумму.
0,0
(0 оценок)
Популярные вопросы: Информатика
диана2470
13.04.2022 06:47
Вводить числа до тех пор пока не пудет введено положительное найти номер минимального. (решать в паскале)...
KatherinePirs
16.03.2023 01:20
Эта клавиша перемещает курсор на определенную позицию вправо1)Tab 2)Delete3)Esc...
Karakatica44
26.02.2022 20:07
Алгоритм - это a) правила выполнения определенных действий;b) предписание исполнителю совершить последовательность действий, направленных на достижение поставленных целей;c)...
данила307
06.10.2020 03:44
Определить максимальное и минимальное значение из трех различных вещественных чисел. работа на поскале...
buznikovame
19.04.2023 18:41
Сканируется цветное изображение размером 12,7×12,7 дюйм. разрешающая сканера — 1200×1200 dpi, глубина цвета — 4 бита. какой информационный объём будет иметь полученный графический...
ггвв
26.11.2020 02:07
Напишите 10 легких пословиц коротеньких...
rockstar9494
26.11.2020 02:07
Привидите примеры явления природы! ,тот,кто хорошо знает я не !...
DariaRain7
26.11.2020 02:07
Как решить: 10a-4b+5,если (7a-6b+5)/(3a-2b-1)=4...
zka20zka20
26.11.2020 02:07
Отметьте какие явления отображены в стихотворении ф.и. тютчева весенние воды еще в полях белеет снег, а воды уж весной шумят – бегут и будят сонный брег, бегут, и блещут, и гласят...
ЕваКротевич
26.11.2020 02:07
Іть розкрити дужки і звести подібні доданки 8х - 4 (16 - 2х)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
n, i: integer;
begin
n := 0;
for i := 1 to 100 do
n := n + sqr(i);
writeln('Сумма квадратов первой сотни чисел = ', n);
end.
Здесь квадрат числа 100 так же включается в сумму.