Даны три числа a b c составьте пограмму которая вычислит квадратный корень только тех чисел которые положительные
114
230
Ответы на вопрос:
program ncd;
uses crt;
var a,b,c: real;
begin
clrscr;
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));
readln;
end.
Популярно: Информатика
-
поля120934875615.10.2022 07:53
-
Salahaddin00114.01.2022 06:08
-
Dasha899916.05.2020 23:15
-
AnnI82016.03.2023 11:29
-
catpolina2104.05.2023 14:06
-
arinaantonuyk12.04.2022 16:25
-
Зайчутка12.04.2022 15:49
-
ден101910.02.2020 18:07
-
yakormnevzad14.02.2022 19:02
-
Эхорит21.12.2022 12:08