Question

Написать программу на языке Паскаль для решения задачи: Найти сумму всех n-значных чисел. (3≤n≤7).

Answer 1

Ответ:

var x,n: integer;

begin

 x:=1;

 for n:=3 to 7 do x:=x+n;

 Write('Сумма: ', x);

end.