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

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

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

rafik91

09.12.2020 23:18

KING ARTHUR.образнаязнаковаяСмешанная напечатанные ноты с песней как назвать,знаковый...

fofanz

10.04.2020 10:36

Определите , что будет напечатано после выполнения программы: var k, s : integer ; begin k := 1; s := 3; while s 100 do begin s := s + 5 ; k := k + 2 end; write(k) end...

Деп567

03.07.2022 21:01

определи основание системы счисления числа 22610...

VikaGrin1

18.08.2020 04:24

- Омарова Дария5ф-дпапшn программу, обродящую Аптонпродаж «Долголетия»Желаете изучить хиты продаж? даИнтересующая категория: бытовая химияСтиральный порошок, Щётка для обувиПрограмма...

daa86

26.10.2022 14:12

Дан фрагмент программы: a: =0; b: =100; while b a do begin a: =a+2; b: =b-1; end. сколько раз будет выполнено тело цикла? чему в итоге равны значения переменных a и b? сколько...

maksburyas

26.10.2022 14:12

Что общего между природным явлением и макетом...

Aigerim1111111111

26.10.2022 14:12

Что общего между зданием и рисунком...

даша3643

23.08.2020 19:53

Полученная в нужный момент времени информация является . дополните предложение...

Himimory

22.06.2020 05:22

Напишите программу для получения квадратной матрицы порядка n* n....

вера571

01.03.2022 18:01

Напишите программу для нахождения наибольшего и наименьшего элемента прямоугольный матрицы и поменяйте их местами....

Ответ:

girlmarta

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 оценок)

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

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