Дан радиус окружности. Найти ее диаметр. (записать программу в Pascal ABC) . P.S. Заранее спасибо!
Дан радиус окружности. Найти ее диаметр. (записать программу в Pascal ABC) .
P.S. Заранее спасибо!
Гость
Ответ(ы) на вопрос:
ГостьКак сказал кто-то, действительно мощно:D
var
r,d:integer;
begin
writeln('введи значение радиуса ',r);
readln(r);
d:=r*2;
writeln('диаметр ',d);
end.
Не нашли ответ?
Похожие вопросы