Uses crt; var a,b,c,x,max,min,sum,pr: integer; begin write('Введите число: '); readln(x); a:= x div 100; b:= x div 10 mod 10; c:= x mod 10; sum:=a+b+c; pr:=a*b*c; if a>b then begin min:=b; max:=a; end else begin max:=b; min:=a; end; if min>c then min:=c; if max<c then max:=c; writeln('Сумма цифр числа: ',sum); writeln('Произведение цифр числа: ',pr); writeln('Максимальная цифра: ',max); writeln('Минимальная цифра: ',min); end.
в лесу, в саванне или даже в вашем саду — живые существа непрестанно «разговаривают» друг с другом. В книге «Язык животных» говорится: «Живые организмы задействуют все органы чувств, а также всевозможные позы и движения, посылая и получая сигналы — кто-то едва уловимые, а кто-то и весьма явные, как, например, скунс в момент испуга. Они издают запахи, пищат, гогочут, поют и чирикают; обмениваются электрическими и световыми сигналами, меняют окраску, „танцуют“ или даже топчут и трясут находящуюся под ними поверхность» («The Language of Animals»). Что же они хотят этим сказать?
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
