Question

1. распечатать в "столбик" таблицу умножения на число n(значение n ввести с клавиатуры; 1<=n<=9)
2. дано натуральное число n. Найти сумму n^2+(n+1)^2+...+(2n)^2
все задачи решить на паскале, помогите пожалуйста

Answer 1

1)
var a,b:integer;
beginwriteln('введите число');
read(a);
for b:=1 to 9 do
begin
writeln(a,'*',b,'=',a*b);end;
end.
2)    
var a,b,c:integer;
beginwriteln('введите число');
read(a);
c:=0;
for a:=a to (a*2) do
begin
c:=sqr(a)+c;
end;
writeln(c);
end.