1) составьте программу, вычисляющую сумму квадратов всех чисел от 1 до N.
2) написать программу, определяющую сумму всех нечетных чисел от 1 до 99

i,n,s:integer;

s:=0;

for i:=1 to n do S:=s+i*i;

i,s:integer;

s:=0;

i:=1;

while i<=99 do

S:=s+i;

i:=i+2;