Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Найти длину окружности, предварительно проверив корректность ввода исходных данных.

Ответ оставил Гость

Вместо "введённые данные некорректны" можете поставить что угодно.
C - длина окружности
R - радиус окружности
Язык програмирования: Паскаль
Программа без цикла.
var
C,R:real;
begin
read(R);
if R>=0 do
begin
C:=2*3.14* R;
writeln(C);
end;
else
write(введённые данные некорректны);
end.