Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
lizakaraseva0
27.08.2021 04:36 •
Информатика
Составить программу для вычисления суммы квадратов чисел от 1 до 15. функция возведения в квадрат sqr(); var , , : ; begin : =0; for : = to do begin ; ; end; writeln(' =', ); end. там, где пробелы, вставить что нужно
Показать ответ
Ответ:
Quantum2004
02.10.2020 01:19
Var i,s,x:integer;;
Begin
s:=0;
For i:=1 to 15 do
Begin
x:=sqr(i);
s:=s+x;
End;
Writeln('suma =',s );
End.
2) второе решение
Var i,s,x:integer;;
Begin
s:=0;
For i:=1 to 15 do s:=s+sqr(i);
Writeln('suma =',s );
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
musulmanka95
08.08.2022 23:33
ответы на все билеты ! 1. создать css, предназначенный для форматирования абзаца текста (цвет текста – красный, увеличить межсимвольные и междустрочные интервалы, размер шрифта...
milenaborowik
17.09.2020 14:44
1. составьте таблицу истинности для выражения: x & (- y v-x ) 2. определите значение переменной а после выполнения алгоритма : а : = 10 b : = 110b : = 110 + b/aa : = b/11...
alenalebedeva2
10.11.2021 04:11
Машина тьюринга. решить. a={a,b,0,1}. определить, является ли слово p идентификатором (непустым словом, начинающимся с буквы). ответ: слово a (да) или пустое слово (нет)....
Ekirakosyan12
11.09.2022 03:01
Почему выделившийся газ в отличие от кислорода необходимо собирать держа сосуд в отверстие вниз...
СтилРайдер
02.10.2021 19:02
Мне, по : 1). задумана дробь, знаменатель которой на 11 больше ее числителя. если к числителю и знаменателю прибавить по 7, то значение дроби будет равно 1/2. какая дробь задумана?...
shishkova600
02.10.2021 19:02
Как правильно записать условие по 3 класс авторы богданович лишенко 395...
azharabikenova
02.10.2021 19:02
Какая орфограмма в слове компьютер? !...
znatokchok
02.10.2021 19:02
В1645–1676 гг. в россии царствовал алексей михайлович, время правления которого было периодом наивысшего расцвета московского царства. однако именно семнадцатый век остался...
Danila12312
02.10.2021 19:02
Реши уравнение двумя используй чертеж. 72-х-14=26...
сашагалкина1
02.10.2021 19:02
Составте предожение со словом инженер в родително падеже...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
s:=0;
For i:=1 to 15 do
Begin
x:=sqr(i);
s:=s+x;
End;
Writeln('suma =',s );
End.
2) второе решение
Var i,s,x:integer;;
Begin
s:=0;
For i:=1 to 15 do s:=s+sqr(i);
Writeln('suma =',s );
End.