Даны 3 числа a b c возвести в квадрат только отрицательные черeз qbasic

румия2408 румия2408    3   27.05.2019 11:40    0

Ответы
Ленf77 Ленf77  24.06.2020 12:04
Var a, b, c: longint;
begin
  readln(a, b, c);
  if a<0 then writeln (a*a);
  if b<0 then writeln (b*b);
  if c<0 then writeln (c*c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика