Даны три числа а,в,с.составить программу,котораЯ вычислит квадратный корень только положительных чисел
Даны три числа а,в,с.составить программу,котораЯ вычислит квадратный корень только положительных чисел
Гость
Ответ(ы) на вопрос:
ГостьПаскаль:
Program one;
Var a,b,c:real;
Uses CRT; //можно не писать, команда подключает консоль
begin
Writeln('Введите 3 числа');
Readln(a,b,c);
If a>=0 then writeln(sqrt(a));
If b>=0 then writeln(sqrt(b);
If c>=0 then writeln(sqrt(c);
end.
Не нашли ответ?
Похожие вопросы