B) 67,45 – 7,45 · 13, ширина 3,5 м и высота 2,69 м. Найдите объём комнаты. ответы округлите до десятых. Dad 10 Пота пnaMaҮГельного параллелепипеда больше его ширины
Постройте четыре точки А, В, С и Д по следующему условию: АВ = 8 см, АС = 4 см, СВ = 8 см, AД = 6 см, ДB = 4 см, точки С и Д лежат по разные стороны от прямой АВ. Измерьте расстояние между точками С и Д. ---------------------------------------------------------------------------------------------------------
Чертим прямую. На прямой ставим две точки А и В на расстоянии 8 см друг от друга. Циркулем рисуем окружность с радиусом 4 см с центром в точке А по одну сторону от прямой АВ. Из точки В чертим окружность с радиусом 8 см (по эту же сторону от прямой АВ). Место пересечения окружностей и есть точка С. По другую сторону от прямой АВ чертим окружность с радиусом 6 см с центром в точке А. Другую окружность радиусом 4 см с центром в точке В. Место пересечения окружностей и есть точка Д. Измеряем расстояние между точками С и Д = 8 см.
Program Ranea15Ranea_1; uses crt; var i,p:integer; begin writeln('*** Alphaues is thinking... ***'); p:=1; for i:=-10 to 20 do p:=p*i; writeln('Модуль произведения чисел от -10 до 20 равен ',abs(p)); end.
Program Ranea15Ranea_2; uses crt; const n=20; var a:array [1..n] of integer; i,pos:integer; begin writeln('*** Alphaeus is thinking... ***'); writeln('*** OK ***'); writeln(); randomize; {заполняем массив} for i:=1 to n do begin a[i]:=random(101)-50; write (a[i]:4); end; writeln(); {ищем положиетельные элементы, заменяем их нулями, и считаем их количество} pos:=0; for i:=1 to n do begin if a[i]>0 then begin a[i]:=0; pos:=pos+1; end; end; {выводим результат} writeln(); writeln(' Заменено ',pos,' положительных элементов'); end.
Постройте четыре точки А, В, С и Д по следующему условию: АВ = 8 см, АС = 4 см, СВ = 8 см, AД = 6 см, ДB = 4 см, точки С и Д лежат по разные стороны от прямой АВ. Измерьте расстояние между точками С и Д.
---------------------------------------------------------------------------------------------------------
Чертим прямую. На прямой ставим две точки А и В на расстоянии 8 см друг от друга.
Циркулем рисуем окружность с радиусом 4 см с центром в точке А по одну сторону от прямой АВ. Из точки В чертим окружность с радиусом 8 см (по эту же сторону от прямой АВ). Место пересечения окружностей и есть точка С.
По другую сторону от прямой АВ чертим окружность с радиусом 6 см с центром в точке А. Другую окружность радиусом 4 см с центром в точке В. Место пересечения окружностей и есть точка Д.
Измеряем расстояние между точками С и Д = 8 см.
uses crt;
var i,p:integer;
begin
writeln('*** Alphaues is thinking... ***');
p:=1;
for i:=-10 to 20 do
p:=p*i;
writeln('Модуль произведения чисел от -10 до 20 равен ',abs(p));
end.
Program Ranea15Ranea_2;
uses crt;
const
n=20;
var
a:array [1..n] of integer;
i,pos:integer;
begin
writeln('*** Alphaeus is thinking... ***');
writeln('*** OK ***');
writeln();
randomize;
{заполняем массив}
for i:=1 to n do
begin
a[i]:=random(101)-50;
write (a[i]:4);
end;
writeln();
{ищем положиетельные элементы, заменяем их нулями, и считаем их количество}
pos:=0;
for i:=1 to n do
begin
if a[i]>0 then
begin
a[i]:=0;
pos:=pos+1;
end;
end;
{выводим результат}
writeln();
writeln(' Заменено ',pos,' положительных элементов');
end.