Предмет: Информатика, автор: qeqer

Напишите программу на языке Паскаль по алгоритму.
Заранее спасибо)

Приложения:

Ответы

Автор ответа: BobbyFresnel
1

===== PascalABC.NET =====

begin

 var (a, b) := (1, 1);

 repeat

   a *= 2;

   b += 2

 until a = 128;

 Print(b)

end.

Приложения:
Похожие вопросы