Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.