Предмет: Информатика,
автор: bakontai2020
Найти длину окружности p заданного радиуса r
через паскаль
Ответы
Автор ответа:
12
program okr;
const pi = 3.14;
begin
var r, p: real;
writeln('Введите радиус окружности');
readln (r);
p = 2 * pi * r;
writeln('Длина окружности = ', p);
end.
Похожие вопросы
Предмет: Русский язык,
автор: масяня2012
Предмет: Другие предметы,
автор: fm98
Предмет: Русский язык,
автор: asisarsenova
Предмет: Математика,
автор: 12312312412
Предмет: Математика,
автор: anka110