var sum, i, s: integer; //обыявляем необходимые переменные
//sum - сумма, i - кол-во слогаемых, s - само слогаемое
begin //начало sum := 0; i := 1; s := 5; //первое слогаемое = 5 repeat sum := sum + s; //к сумме прибавляем слагаемое s := s + 4; //увеличиваем слогаемое i := i + 1; //увеличиваем кол-во слогаемых until (sum = 324); //выход когда сумма равна 324 writeln ('Слогаемых: '); // выводим кол-во слогаемых write (i); end. //конец
параллелограмм 1 середина любой диагонали параллелограмма является центром его симметрии 2 противоположные стороны равны 3 противоположные углы равны 4 каждая диагональ параллелограмма делит его на 2 равных треугольника 5 диагонали делятся пополам в точке их переселения 6 сумма квадратов диагоналей равна сумме квадратов его сторон
ромб(обл. общими св-ми с параллелограммом) 1диагонали взаимно перпендикулярны 2диагонали являются биссектрисами его внутренних углов 3ромб делится диагоналями на 4 равных прямоугольных треугольника
квадрат(т.к. является и параллелограммом, и прямоугольником, и ромбом то он обл. всеми их св-вами) 1все углы прямые 2диагонали кввадрата равны взаимно перпендикулярны точкой пересечения делятся пополам и делят углы квадрата пополам
1) 5 9 13 17 21 25 29 33 37 41 45 49
var sum, i, s: integer; //обыявляем необходимые переменные
//sum - сумма, i - кол-во слогаемых, s - само слогаемое
begin //начало
sum := 0; i := 1; s := 5; //первое слогаемое = 5
repeat
sum := sum + s; //к сумме прибавляем слагаемое
s := s + 4; //увеличиваем слогаемое
i := i + 1; //увеличиваем кол-во слогаемых
until (sum = 324); //выход когда сумма равна 324
writeln ('Слогаемых: '); // выводим кол-во слогаемых
write (i);
end. //конец