Задание 3 Составь следующую программу: если аквалангист
поймает краба, то он исчезает со сцены.
Вывод
Понравился ли тебе созданный проект?
Какую игру тебе бы хотелось создать самостоятельно?
Поделись своими мыслями.​

1. utfa.fps

2.какую программу?

3. x(n)=5n²-4n-1

xn-нечётное тогда, когда n-чётное

x(0)=-1

x(2)=11

x(4)=63

x(6)=155

x(8)=287

x(10)=459

x(12)=671

x(14)=923

x(16)=1215

x(18)=1547

x(20)=1919

program first; var i,a,b: integer; begin  cls;   read(a,b,i);   if a< 0 then write(sqr(a));

  if b< 0 then write(sqr(b));

  if i< 0 then write(sqr(i))end.

program xxx;

var s : string;

        а : integer;

begin

    writeln ('введите слово-');

    readln (s);

    а: = length(s)

    writeln ('длина слова=', a);

    readln

end.

на вход "черного ящика"подается число 125. о чем в этом случае говорит отказ: кажеться а