Пожалуйста помогите написать...

Тема в разделе "Информатика", создана пользователем 0720, 1 апр 2010.

  1. 0720

    0720 New Member

    Пожалуйста помогите написать программу в паскале!!!!!!! Даны радиус круга и сторона квадрата. Проверьте, пройдет ли круг вквадрат?
     
    0720, 1 апр 2010
    #1
  2. igorlvov

    igorlvov New Member

    var r,a:real;
    begin
    readln(r,a);
    if 2*r<a then writeln('proidet') else writeln('ne proidet');
    end.
     
    igorlvov, 1 апр 2010
    #2

Поделиться этой страницей

Наша группа