сделать программу ABCpascal
Даны 2 числа если оба числа отрицательные то найти корень из деления иначе увеличить первое в 3 раза а второе на 7
Ответы на вопрос
Ответил Кот49
0
var a,b : real;
begin
read(a,b);
if (a<0) and (b<0) then Writeln(sqrt(a/b)) else
Writeln(a*3,' ',b+7);
end.
Ответил Helpmeplease2011
0
спасибо бро
Новые вопросы
Английский язык,
2 года назад
Английский язык,
2 года назад
География,
7 лет назад
Математика,
7 лет назад