Минимально и нужно , интересно где еще такое задают
Решить - это означает вычислить?
Если да, то написать программу из трех операторов.
Первый - begin
Второй - Write(то, что нужно вычислить)
Третий - end.
В вашем случае это будет так:
begin Write(2*(300-277)*3-2*(100-98)/2) end.
В результате получим 136.
Ответ:
460 байт= 3680 бит
Объяснение:
1 Байт равен 8 битам
Просто умножь 460 на 6 и получишь 3680.
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
SeqGen(ReadInteger('n='),1,1,(x,y)->x+y).Println
end.
<u><em>Тестовое решение:</em></u>
n= 10
1 1 2 3 5 8 13 21 34 55