Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
77Stranik77
01.02.2022 08:51 •
Информатика
Pascal вычислить сумму 1^4+2^4++n^4 (while, repeat until или for)
Ответ:
mrrur99
02.10.2020 17:18
Program al;
var n,i,s:integer;
begin
writeln('vvedite n =');
readln(n);
s:=0;
for i := 1 to n do
s:=s+sqr(i)*sqr(i);
writeln ('s=',s);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
polinaabramova10
27.10.2021 20:08
Вс++ ! написать рекурсивную функцию, которая получает целое число n и разбивает его на разряды (отдельно единицы, десятки, сотни, тысячи и т. например: ввод: 12345...
darkilia2006p01bb5
07.04.2022 00:09
Выполните на компьютере программу решения задачи, рассмотренной в примере пункта 2.2.4. Считайте количество жильцов дома случайным числом из диапазона от 50 до 200...
Gamer2205395
27.05.2020 23:08
Простое число – такое число, у которого нет делителей, кроме 1 и самого числа. Напишите программу, которая найдёт сумму первых пяти простых чисел, которые больше 10000....
Diamond1111111
28.01.2022 12:58
Каков результат следующего фрагмента кода? d = {foo 1, bar :2, baz :3}while d: print(d.popitem()) print ( Done. )ответ:( baz , 3)( bar ,2)( foo , 1)Done...
zizircom
28.01.2021 13:21
Хорошие люди не проигнорируют ❗️❗️❗️...
vaniev2006
13.07.2021 14:27
Хлп! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ...
ОляХ1
20.02.2020 21:13
Найти ошибки в этой игре https://previews.customer.envatousercontent.com/files/302627045/index.html...
Саша12811
13.08.2020 18:41
Составьте формулы веществ:а) хлорид железа (3)б) фосфат цинкав) карбонат аммония...
PooКякя
29.01.2022 11:39
У байці Жаба і Віл алегорія полягає в тому, що варіанти відповідейНе можна порівнювати тварин, які відрізняються за своєю силою та розмірамиНерозумно вести розмову...
Stasya1985
29.01.2022 11:39
Сколько существует трёхзначных цифр в записи которых есть две цифры 3? С объяснением ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,i,s:integer;
begin
writeln('vvedite n =');
readln(n);
s:=0;
for i := 1 to n do
s:=s+sqr(i)*sqr(i);
writeln ('s=',s);
readln;
end.