Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ирина1844
31.03.2022 19:27 •
Информатика
Посчитать сумму квадратов первых 10 чисел.(на паскале ришить)
Ответ:
AlexBennet
04.10.2020 14:29
Var sum,i:integer;
begin
for i:=1 to 10 do
sum:=sum+i*i;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
navimarik
26.08.2022 01:27
Информация о кодах 500 сотрудников записывается минимально возможным количеством битов. каков информационный объем (в байтах) полученного сообщения о 240 сотрудниках? в ответе...
cat497
26.08.2022 01:27
Дано количество секунд сначала суток. вычислить текущее время в виде количества часов, минут и секунд....
Zhenya2099
26.08.2022 01:27
Паскаль даний квадрат підрахувати його площу якщо з клавіатуру ведена довжина e, b...
elyukros
02.09.2021 00:07
Какое количество информации в битах (с точки зрения алфавитного подхода) содержит шестнадцатеричное число abcde16? в ответе укажите только число....
gsubxdu
02.09.2021 00:07
Какой объем имеет двусторонняя дискета, если каждая сторона ее разбита на 80 дорожек по 15 секторов на дорожке? объем каждого сектора 4096 бит. с объяснением !...
Rehjxrf13
30.01.2020 06:30
Напишите наименьшее число x, для которого истинно высказывание: НЕ (x 13) И НЕ (x не делится на 8)решите с объяснением ...
max4bob
10.04.2022 14:53
решить эти задачи по информатике. Чем быстрее, тем лучше!...
proxiv
16.09.2021 04:49
Даны 2 строки символов. получить новую строку путем сложения 2-х строк. в новой строке найти номер позиции символов -? . паскаль...
masya90
07.02.2020 23:13
Придумайе 3 слова по форме наречие+наречие...
lawrence02
07.02.2020 23:13
Найди число 0,85 которого равно 17...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
for i:=1 to 10 do
sum:=sum+i*i;
writeln(sum);
end.