Program maxmin;
var x, y, z: integer;
max, min: integer;
begin
readln(x, y, z);
max:=x+y+z;
if x*y+z>max then max:=x*y+z;
if sqr(x)+sqr(y)-z > max then max:=sqr(x)+sqr(y)-z;
writeln(max);
min:=<span>x+y+1;
</span>if x*y*z<min then min:=x+y+1;
write(min+1);
end.
var
c, k, n: integer;
begin
writeln('Введите процент: ');
readln(n);
while k < 100 do
begin
k := k + n;
inc(c);
end;
writeln(c * 12, ' мес.');
<span>end.</span>
А1=5
В1=5*2=10
С1=(А1+В1)*10=(5+10)*10=150
Ответ: 3
1) музыка
2)в компьютере
3)антенна
4)не знаю
5)к<span>оличество символов, из которых состоит </span><span>алфавит
6)32 байта
7)сколько символов
8)без понятия
9)40 байтов
10)</span>65536 или 8192
Var i:integer;
begin
for i:=1 to 10 do
writeln(,i,'*7=',i*7);
end.