<span>мини-сочинение (половина страницы или одна страница) на одну из тем :1-Какой способ создания текста-компьютерный или рукописный-вамнравится больше? 2-Одно из значений слова "редактор"-лицо,исправляющее рукопись.Объясните ,почему компьютерные программы для создания текстов назвали текстовыми Редакторами?</span><span>
</span>
var r:real;
begin
write ('Введите радиус окружности: ');
read(r);
writeln ('Диаметр равен: ', r*2:0:3);
writeln ('Длина окружности равна: ', 2*pi*r:0:3);
end.
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var n:=21;
repeat
n+=1
until (n mod 7=0) and (n mod 10=1);
n.Println
end.
<u>Результат</u>
91