Nakyanase
7 год назад
Даны два числа.если квадратный корень из второго числа меньше первого числа,то увеличить второе число в пять раз.иначе заменить его нулями.
ОТВЕТЫ
Pyuagakna
Jul 18, 2019
Var a,b:real;
begin
readln(a,b);
if(sqrt(b)lt;a) then b:=b*5
else b:=0;
writeln(b, - второе число);
end.
begin
readln(a,b);
if(sqrt(b)lt;a) then b:=b*5
else b:=0;
writeln(b, - второе число);
end.
80
Смежные вопросы:
