Составить программу, которая считывает число. Если оно неотрицательное, извлекает из него корень, в противном случает выводит соответсвующее сообщение. ПАСКАЛЬ
Var A:real;BeginWrite('Введите число: ');ReadLn(A);if A>=0 then A:=sqrtAelse write(a) ;Write(A);End.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
