Var i: real; //Натуральное число begin readln(i); //Считал число while (i > 5) do //В условном цикле... i := i / pi; //...преобразовал число writeln(i); //Вывел число end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
