1. 

   vitasik New Member

   Составить программу для паскаля. Задание: с клавиатуры вводится любое число х, если х>=0 найти корень, иначе вывести текст неткорня

    

   vitasik, 21 янв 2010

   #1
2. 

   Кристл New Member

   var x:real;
   begin
   readln(x);
   if x>=0 then writeln(sqrt(x)) else writeln('net kornya');
   end.

    

   Кристл, 21 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

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

Запомнить меня