Предмет: Информатика, автор: baltabayalibi

ПОМОГИТЕ ПОЖАЛУЙСТА СРОЧНО, ДАМ МАКСИМАЛЬНЫЙ БАЛЛ НАПИШИТЕ ВЕРНО,3. Запустите интегрированную среду программирования. Составьте программный код для задачи: «Дан радиус круга r=2, определите диаметр окружности».

Ответы

Автор ответа: ingr

var

r : real;

d : real;

begin

write('введите радиус окружности r=');

readln(r);

d := 2*r;

writeln('диаметр равен d=2r=', d);

end.

baltabayalibi: А это точно верно? И как писать

ingr: ну диаметр равен двум радиусам так что программа считает верно для любого введенного радиуса. Хотя в твоем случае можно было сделать проще так как радиус известен заранее и равен 2. и вместо ввода радиуса с клавиатуры можно просто в программе написать r:=2;

baltabayalibi: значит вместо readln(r) r:=2

ingr: да, и write('введите радиус окружности r='); заменить на writeln('радиус окружности r=2');

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Алгебра, автор: roma44787

Определи, при каком значении a появится бесконечно много решений системы уравнений:
4x−y=5,
20x−5y=a.

5 лет назад

Предмет: Математика, автор: artur3102russ

Плиз, хочу свериться.

5 лет назад

Предмет: Физика, автор: Аноним