
Дан радиус окружности. Найти её диаметр.
(код Pascal)

Лол, ну ок:
var
r : integer;
begin
readln(r);
writeln(r*2);
end;
Оцени ответ