profile
Опубликовано 6 лет назад по предмету Информатика от baltabayalibi

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

  1. Ответ
    Ответ дан ingr

    var

       r : real;

       d : real;

       

    begin

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

       readln(r);

       d := 2*r;

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

    end.

    1. Ответ
      Ответ дан baltabayalibi
      А это точно верно? И как писать
    2. Ответ
      Ответ дан ingr
      ну диаметр равен двум радиусам так что программа считает верно для любого введенного радиуса. Хотя в твоем случае можно было сделать проще так как радиус известен заранее и равен 2. и вместо ввода радиуса с клавиатуры можно просто в программе написать r:=2;
    3. Ответ
      Ответ дан baltabayalibi
      значит вместо readln(r) r:=2
    4. Ответ
      Ответ дан ingr
      да, и write('введите радиус окружности r='); заменить на writeln('радиус окружности r=2');
Самые новые вопросы