Здравствуйте мне . Информатика 6 класс. сказали зделать самим тест и ответ на 10 9 тему. 10 тема:ФИГУРЫ И СХЕМЫ В ДОКУМЕНТЕ. 9 тема :РАБОТА С РИСУНКАМИ В ДОКУМЕНТЕ. 8 ТЕСТОВ НА 9 ТЕМУ 4 ТЕСТОВ И ОТВ. И НА 10 ТЕМУ 4 ТЕСТОВ И ОТВ. ОБЩЕЕ 8 ВОПРОСОВ И ОТВ КАК ТЕСТ А), Б), В).
СЕЙЧАС НУЖНОО.

Если вынуть 94 конфет, то будут конфеты всех 3 видов.Пусть у нас по n конфет каждого вида.Тогда может так получиться, что мы вынем 2n конфет, и они будут только 2 видов. И только, вынув (2n+1)-ю конфету, мы получим все три.2n+1 = 942n = 93.Значит, конфет одного и другого вида по [93/2] = 46,а конфет третьего вида 47.Пусть ирисок и леденцов по 46, а шоколадных 47.Вынув 46 ирисок и 46 леденцов (92 конфет), мы получим 2 вида.Вынув 46 ирисок и 47 шоколадных (93), мы получим 2 вида.Вынув 46 леденцов и 47 шоколадных (93), мы получим 2 вида.И только вынув 94-ую (в 1 случае 93 и 94), мы получим 3 вида.ответ: всего конфет было 46 + 46 + 47 = 139.

1)

var a,b,c,d,s,p:real;
begin
cls;
writeln('введите стороны треугольника:');
read(a,b,c);
p:=(a+b+c)/2;
s:=Sqrt(p*(p-a)*(p-b)*(p-c));
write('Площадь треугольника S=',s);
end.

2)

var a,b,c,d,s,v:real;
begin
cls;
write('Введите 3 ребра=');
read(a,b,c);
V:=a*b*c;
S:=2*(a*b+b*c+a*c);
d:=(a+b+c)*2;
writeln('Прямоугольный параллелепипед:');
writeln('Обьём:',V);
writeln('Площадь:',S);
writeln('Сумма рёбер:',d);
end.

3)

var a,b,c,d,P:real;
begin
cls;
writeln('введите сторону и 2 угла ромба');
read(a,b,c);
if b>c then
P:=a*Sqrt(2+2*Cos(b))
else
d:=a*Sqrt(2+2*Cos(c));
writeln('Большая диагональ ромба D=',P);
writeln('Меньшая диагональ ромба d=',d);
end.