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

Найти сумму квадратов чисел от 1 до 10 программа free pascal

Показать ответ

Ответ:

KatyaTishkina

07.08.2020 16:54

Program summakvadratov (input, output);
var I, a:integer;
begin
a:=0;
for I:=1 to 10 do
a:=a+sqr(I);
writeln (a);
end.

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

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

vika03121

01.04.2023 12:42

Последний актет в широковещательном ip-адресе сети класса С...

nikoscki

17.04.2020 11:35

Укажите условия правельно зиписанные на языке паскаль x 0 5 y c= 5...

jena6

10.12.2022 02:47

ответьте Только просто больше нету 1. Этапы решения прикладных задач на ЭВМ: постановка задачи, построение математической модели, выбор метода решения.2. Этапы решения прикладных...

dashakoryakina

31.03.2021 23:03

Этапы решения прикладных задач на ЭВМ: постановка задачи, построение математической модели, выбор метода решения....

annvs1

28.06.2022 03:27

Очень нужно, что ещё устройство ввода? ...

друг100

13.12.2022 19:52

Решить на паскале или питоне, или .хотя бы алгоритм : для настольной игры используются карточки с номерами от 1 до n. одна карточка потерялась. найдите ее, зная номера оставшихся...

Anuffka

13.12.2022 19:52

Дан одномерный массив состоящий из 15 элементов.найти элементы кратные 5...

MariaMmchka

13.12.2022 19:52

Вывести целое число и определить верно ли, что в его записи есть две одинаковые цифры. например, 1234 - нет; 1224 - да. обязательно должен присутствовать цикл с предусловием...

ValkyriaDemon

13.12.2022 19:52

Какое лишнее слово ) знак,звук ,! б) буква ,число,цифра ,символ...

zlodej

13.12.2022 19:52

Объясните , какое слово что делает (в программирование) программа паскаль abc.net : var n,m,head,eye: integer; begin writeln( сколько лет вашему дракону? ); readln(n); head:...

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

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