Дан радиус окружности. Отыскать ее поперечник. (записать программку в Pascal ABC)

Дан радиус окружности. Отыскать ее поперечник. (записать программку в Pascal ABC) .
P.S. Заранее спасибо!

Задать свой вопрос
Танечка Зальцман
Программку умножения введенного числа на 2? Сильно...
1 ответ
Как произнес кто-то, вправду сильно:D
var
r,d:integer;
begin
writeln('введи значение радиуса ',r);
readln(r);
d:=r*2;
writeln('поперечник ',d);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт