Определить среднее арифметическое двух чисел, - вопрос №10902227 от ppavlowich 20.05.2022 01:29

Question

Информатика: Определить среднее арифметическое двух чисел, если a положительное, в противном случае найти частное этих чисел

ppavlowich · Answer

var a,b,c:integer; begin  Writeln( Введите два числа: );  Read(a,b);  if a 0 then    Writeln( Среднее арифметическое: , (a+b)/2)  else Writeln( Частность: , a/b);end....