Найти в сети интернет или придумать свою интересную на переправу. оформить на одном листе текстового документа описание с рисунками, а на другом таблицу с решением.
1) there are 4 rooms in this house. (подставите количество сами, т.к. не вижу в каком 2)there are 2 bedrooms in this house. 3) there in his living (аналогично на остальные вопросы), т.к. не видно картинки, чтобы вам перечислить,что в зале, в обеденной комнате, ванне, спальне и ученическом столе).
pascal
Объяснение:
var
a, b, c: real;
rel: boolean;
begin
Write('Введите стороны треугольника через пробел: ');
ReadLn(a, b, c);
if (a + b > c) and (a + c > b) and (b + c > a)
and (a > 0) and (b > 0) and (c > 0) then
begin
WriteLn('Треугольник с указанными сторонами существует.');
if (a + b + c) / 3 = a then
begin
WriteLn('Треугольник является равносторонним.');
rel := true;
end
else if ((a + b) / 2 = a) or ((b + c) / 2 = b) or ((a + c) / 2 = a) then
begin
WriteLn('Треугольник является равнобедренным.');
rel := true;
end;
if (a*a + b*b = c*c) or (a*a + c*c = b*b) or (b*b + c*c = a*a) then
begin
WriteLn('Треугольник является прямоугольным.');
rel := true;
end;
if not(rel) then WriteLn('Треугольник является произвольным.');
end
else
WriteLn('Треугольник с указанными сторонами не существует.');
end.