Ответ:
Var
y,x: integer;
begin
writeln('Ведите ваше число:');
read(x) ;
if x > 2 then
writeln('Результат y =: ', x+3)
Else
if x <=- 2 then
writeln('Результат y =: ', 1 div x);
Readln ;
end.
===== PascalABC.NET =====
procedure pK(n: integer; var k: int64);
begin
k := 1;
for var i := 2 to n do
k *= i
end;
function fK(n: integer): int64;
begin
Result := 1;
for var i := 2 to n do
Result *= i
end;
begin
var n := ReadInteger('n =');
var r: int64;
pK(n, r);
Println('Процедура:', r);
Println('Функция:', fK(n))
end.
Ответ:
program Example1;
begin
Write ('Пусть бегут неуклюже пешеходы по лужам');
ReadLn;
end.
12 в десятичное - 110 в троичной.
<span><span>Относительный тип - обычная ссылка вида буква столбца-номер строки (B1, С4, похоже на морской бой). При копировании формулы Excel использует этот тип по умолчанию и это удобно.
</span><span>Абсолютный тип - ссылка вида $буква столбца-$номер строки. Абсолютный тип мы используем, когда хотим намертво зафиксировать ссылку на ячейку при копировании формулы.
</span><span>Смешанный тип сочетает в себе признаки относительного и абсолютного типов ссылок.</span></span>