Регистрация
Войти
Стать экспертом Правила
Информатика

Даны целые числа A, B, C. Если A <B <C, то все числа возвести в квадрат и напечатать, иначе найти сумму этих чисел и напечатать.

ОТВЕТЫ



begin
  var (a,b,c):=ReadReal3('Введите A,B,C через пробел:');
  if (b>a) and (b<c) then Println(a*a,b*b,c*c)
  else Writeln(a+b+c)
end.


Введите A,B,C через пробел: 3.15 8 -6
5.15

Введите A,B,C через пробел: -6 1.18 4.521
36 1.3924 20.439441
575
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам