Даны 2 действительных числа.Возвести в квадрат те из них,значение которых неотрицательны.Числа вводятся пользователям с клавиатуры.Результат работы программы вводится на экран
Ответы:
22-02-2019 10:44
Var a,d,f,g: integer; begin readln(a,d); if a>0 then begin f:=sqr(a); writeln(f); end; if d>0 then begin g:=sqr(d); writeln(g); end; end.
Также наши пользователи интересуются:
Третий член арифметической прогрессии равен 5. А сумма первых десяти членов равна 75. Найдите сумму квадратов второго и четвертого членов этой арифметической профессии. На первую машину погрузили 4,5 т картофеля на вторую машину в 1,4 раза больше чем на первую а третью - на 1,6 т меньше чем на вторую . Сколько тонн картофеля погрузили на три
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Даны 2 действительных числа.Возвести в квадрат те из них,значение которых неотрицательны.Числа вводятся пользователям с клавиатуры.Результат работы программы вводится на экран » от пользователя Леся Заболотнова в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!