1)
var a,b,c:real;
begin
write('Введите три стороны треугольника: ');
readln(a,b,c);
if((a < b+c) and (b < a+c) and (c < a+b)) then write('Периметр треугольника: ',(a+b+c):9:3)
else write('Треугольник с данным сторонами не существует');
end.
2)
var a,b:real;
begin
write('Введите два числа: ');
readln(a,b);
writeln('Сумма данных чисел: ',(a+b):9:3);
write('Произведение данных чисел: ',(a*b):9:3);
end.
А8=341=3*8^2+4*8^1+1*8^0=225
A6=341=3*6^2+4*6^1+1*6^0=133
A16=341=3*16^2+4*16^1+1*16^0=
A5=34,1=3*5^1+4*5^0+1*5^-1=
Последние две строчки сам посчитай.
program TabulW;
var
a, b, c, x, dx, w: real;
begin
a := 2.8;
b := -0.3;
c := 4.0;
x := 1.0;
dx := 0.05;
Writeln(' a b c x w');
while x - 2 < 0.0001 do
begin
if x < 1.2 then
w := a * x * x + b * x + c
else if x > 1.2 then
w := (a + b * x) / sqrt(x * x + 1)
else
w := a / x + sqrt(x * x + 1);
Writeln(a:6:3, b:8:3, c:8:3, x:8:3, w:8:3);
x += dx
end;
Readln;
end.
Линейка нужна для изменения расстояния (между точками) с незначительной погрешностью.Барометр нужен для измерения атмосферного давления.Транспортир нужен для измерения градусной меры угла с незначительной погрешностью.Для того чтобы температуру мерить.Компас нужен для ориентирования по магнитным полюсам Земли.<span>Телескоп - это прибор для наблюдения за звёздами, планетами и прочими небесными телами. </span>
Вентиляция<span> – </span>это<span> регулируемый воздухообмен, осуществляемый с целью создания в </span>помещениях<span>жилых, общественных и промышленных зданий воздушной среды, благоприятной для здоровья и трудовой деятельности человека, а также для технологических целей. </span>Вентиляционные<span> системы – совокупность мероприятий и/или технических устройств, обеспечивающих воздухообмен.</span>