сделать эти 2 заданич​

дело в том, что цифра это знак, и буква это знак.

var

s,n,i: integer;

begin

write('введите количество чисел');

readln(n);

s: =0;

for i: =1 to n do

s: =s+i*3;

writeln(s);

end.

3*2=6128*512*6=393216ъ128+512=640640: 10=6464*6=384кб

var x,y: real;

begin

  read(x);

  if x< =10 then y: = 210

  else y: = x*x*x;

  writeln(y);

end.