// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
Print('Нулей:', ArrRandom(ReadInteger('n='), -10, 10)
.Println.Where(t -> t = 0).Count)
end.
1. Ссылка $A$1 - абсолютная и при копировании не меняется. Поэтому в B2 и B3 формула запишется без изменений. В В1 будет значение 20+1=21 и это же значение будет в B2-B3
Таблица примет вид
20 21
21
21
2. Формула $A$1+A1 содержит как абсолютную ссылку, так и относительную. Относительная при копировании будет меняться.
Вычисление по этой формуле в В1 даст значение 10+10=20.
При копировании В1 в В2 формула примет вид $1$1+A2 и её значение будет 10+20=30.
При копировании В1 в В3 формула примет вид $1$1+A3 и её значение будет 10+30=40.
Ответ: 30, 40
Var g,t:integer;
s:real;
begin
g:=10;
writeln('Время падения в секундах равно ');
read(t);
while t<>0 do
begin
s:=(g*sqr(t))/2;
writeln('Высота колодца равна ',s,' метров.');
writeln('Время падения в секундах равно ');
read(t);
end;
end.<span>
</span>