ИСПОЛЬЗОВАТЬ ЧЕРЕПАХА (программа кумир)

Question

Информатика: ИСПОЛЬЗОВАТЬ ЧЕРЕПАХА (программа кумир)

Маркус337 · Accepted Answer

// A)

begin

var f1 := BigInteger(1);

var f2 := BigInteger(1);

var Count := 2;

repeat

var f := BigInteger(f1 + f2);

f1 := f2;

f2 := f;

Count += 1

until Count = 40;

Write(f2)

end.

// B)

begin

var f1 := BigInteger(1);

var f2 := BigInteger(1);

var m := ReadlnInteger();

repeat

var f := BigInteger(f1 + f2);

f1 := f2;

f2 := f;

until f2 > m;

Write(f2)

end.

// C)

begin

var f1 := BigInteger(1);

var f2 := BigInteger(1);

var S := f1;

repeat

S += f2;

var f := BigInteger(f1 + f2);

f1 := f2;

f2 := f;

until f2 >= 1000;

Write(S)

end.