Впаскале. составьте программу для нахождения произведения двух наименьших из трёх различных чисел.

vavavvavavavava vavavvavavavava    3   12.09.2019 20:10    4

Ответы
Jgareva101dasha Jgareva101dasha  07.10.2020 10:21
Var  a,b,c,mx: integer;  p: real;begin  readln (a,b,c);  mx:=a;  if mx<b then mx:=b;  if mx<c then mx:=c;  p:=(a*b*c)/mx;  write(p);end.  
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика