1.Если дракону сто лет или меньше, то у него 3N голов. Если ему больше ста лет, то у него 300+2(N-100) голов.
2.Высказывание: «Число A является положительным» на языке Pascal записывается как присваивание логической переменной f математического эквивалента (A > 0)
Насколько он сместился за эти три команды "Сместиться на (-5, -1) Сместиться на (3, 2) Сместиться на (3, -1)"? на (-5 +3 +3,-1 +2 -1) = (1,0).
Теперь умножаем полученные координаты на количество повторений: (3,0).
Ещё перед этим он сместился на (-4, -1), значит суммарно он сместился на (3 -4, 0 -1) = (-1, -1). И чтобы вернуться обратно, нужно сместиться на это же значение, но в противоположную сторону, то есть, на (1,1)
Var n, i, k, s: integer;
begin
readln(n);
for i:=1 to n do
begin
readln(k);
if abs(k)>i then s:=s+k;
end;
writeln(s);
end.
(x вводится пользователем)
var x,y:real;
begin
writeln ('Введите переменную x, y=x*2x');
readln (x);
y:=x*2*x;
writeln ('y = ',y);
<span>end.</span>