Войти Регистрация Спроси ai-bota

Найдите квадрат суммы всех целых чисел от 1 до 10

Ответ:

Irina12369

30.08.2020 21:21

Var i,s:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+i;
s:=s*s;
writeln('s^2 = ',s);
end.

Результат:
s^2 = 3025

0,0(0 оценок)

Популярные вопросы: Информатика

ancordkot

13.04.2023 13:12

Постройте верхнюю полуокружность эллипса x^2/4 + y^2=1 в диапазоне [-2,25; 2,25] c шагом 0,25....

xomahgf

07.11.2020 22:22

Как сложить два двоичных числа: 11101011 + 10111001 и правильно расписать решение для преподавателя...

vlinkova4

07.11.2020 22:22

Бизнесмен взял ссуду m тысяч рублей в банке под 20% годовых. через сколько лет его долг превысит s тысяч рублей, если за это время он не будет отдавать долг. c++...

linakn14

07.09.2021 20:43

Как избавится от проблемы : чтобы продолжить установление , , введите диск 1 в сдром и нажмите ок...

armine8

07.09.2021 20:43

На отрезке [1; 2] с шагом 0,1 протабулировать функцию: cos2/x-2sin1/x+1/x...

kuznetsovapoli

02.12.2022 15:11

с английским. Нужно перевести и раскрыть скобки ...

Викторина22

02.12.2022 15:11

с задачкой Сколькими можно рассадить 6 человек за столом: а) в ряд; б) по кругу; в) по кругу, при условии, что места не имеют номеров?...

kachakomba

03.02.2022 01:38

Укажите, какие цифры должен содержать отбрасываемый разряд, чтобы разряд, до которого округляют, не изменили? Укажите один или несколько правильных вариантов ответа:...

GangsterNigga1

03.02.2022 01:38

Сі мажор: головні тризвуки з оберненнями і розв язаннями, тритони, інтервали, 3 види міноруВі але до ть...

myrjyffiyfukfkufkyf

02.12.2020 09:25

(6,3:2×(-1))+(5,6:(-2)+2,8)=...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку