Предмет: Информатика,
автор: yakimenkomasha
решить по языку Pascal
Приложения:
Ответы
Автор ответа:
0
const Pi = 3.14;
var d: Real;
begin
writeln('Введите диаметр');
readln(d);
writeln('Длина = ', 2*Pi*d/2);
end.
Удачи:)
var d: Real;
begin
writeln('Введите диаметр');
readln(d);
writeln('Длина = ', 2*Pi*d/2);
end.
Удачи:)
Автор ответа:
0
const
pi = 3.14;
var
d : Real;
begin
Write('d: ');
Readln(d);
Write(Pi * d:0:3);
Readln;
end.
pi = 3.14;
var
d : Real;
begin
Write('d: ');
Readln(d);
Write(Pi * d:0:3);
Readln;
end.
Интересные вопросы
Предмет: Английский язык,
автор: ermekbaiaryjan
Предмет: Алгебра,
автор: adelinarafikova1
Предмет: Математика,
автор: ivankireev005
Предмет: Алгебра,
автор: Lace