Ответ(ы) на вопрос:
Гостьvar i,r:integer;
p:real;
begin
write ('Введите число,r')
p:=3.14;
i=2*r*p;
writeln (Ответ ' ',i)
readln(i);
end;
Не нашли ответ?
Похожие вопросы
Гость