О том, какими возможностями обладают вычислительные машины.
Как быстро они могут считывать информацию, обрабатывать, в сотни раз быстрее человека.
Единственное о чем следуют помнить - компьютер выполнят команды, задаваемые человеком. Соответственно именно поэтому они и не смогут "Захватить мир", как об этом рассказывают в фильмах ;)
В ячейку B1 нужно ввести формулу =СУММ($A$1:A1) и эту формулу скопировать (распространить) на весь столбец B
var
r, L, S, V: Real;
begin
Write ('Введите радиус: ');
ReadLn (r);
L := 2 * Pi * r;
S := Pi * r * r;
V := 4 / 3 * Pi * Power (r, 3);
Writeln ('Длина окружности = ', L);
Writeln ('Площадь круга = ', S);
Writeln ('Объем шара = ', V);
end;
Ключевое слово "array" написано с ошибкой
program n_1;
var i: integer;
a: array [1..10] of integer;
begin
for i:=1 to 10 do a[i]:=random(50);
for i:=1 to 10 do write (a[i], ' ');
end.