• uses crt; 

    var s:real;

    n:integer;

    begin clrscr;

    write('Collichestvo korney: ');

    readln(n);

    s:=sqrt(2)*n;

    write('S=',s:0:4);

    readkey;

    end.

Ответы 2

  • uses crt, math

    .........................

  • Все верно.....................................................

    • Автор:

      beard
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years