Составьте программу вычисления суммы квадратов от 1 до 20 используя for i,writeln
nastya19831507
3
11.07.2019 05:40
1
Другие вопросы по теме Информатика
ilias1924
28.01.2022 22:03
bililife
28.04.2020 17:59
missiszador
14.12.2020 09:00
annshirokikh
14.12.2020 08:58
ренат123456789
14.09.2019 17:50
414484
14.09.2019 17:50
Pakimon4ikYT
10.04.2020 11:50
RoseIce
18.11.2020 12:09
EdwardLab
18.11.2020 12:09
Популярные вопросы
- 1) 1 греческая олимпиада в 776 году. сколько лет тому назад это произошло? 2)...
1 - Что значит по мнению а.с.пушкина настоящая дружба...
3 - Деталь из стали погружена в жидкость (газ) и удерживается неподвижно жидкости...
3 - Сестра и брат собирали грибы. всего они набрали 87 грибов. брат набрал на 5 грибов...
1 - Красный террор 1917 какими пользовались...
1 - Длина классной комнаты 12 м .а ширина составляет одну вторую часть .чему равна...
2 - Написать тему по : персидское царство...
1 - Выразите: а) в квадратных дециметрах: 1 квадратный см; 8 квадратных см; 25квадратных...
1 - При пропускании постоянного тока через катушку вокруг неё возникло магнитное поле.оно...
2 - Разложить на м ножитель 1) х в квадрате -16 2)d в квадрате -49 выражения 1) 3(х-1)...
2
uses crt;
var i,s:integer;
begin
s:=0;
for i:=1 to 20 do s:=s+i*i;
writeln(s);
end.