Запрограммировать циклический элемент (ПАСКАЛЬ!) За 1 день рабочий изготовил 5 деталей. Напечатать, сколько деталей рабочий изготовит за 5, 6, 7, 8, 9, 10 дней.
Не уверена, что по длине сторон можно определить, что треугольник остроугольный, но предположила, что здесь можно использовать т. Пифагора, т.е. если квадрат гипотенузы (большей стороны) окажется меньше суммы квадратов катетов (меньших сторон), то соответственно и угол между последними окажется меньше 90 градусов. Если я не права отметьте ошибкой, пусть удалят. Итак:
program aaa; var a,b,c,x,y,z,s,p: real; begin writeln ('Введите стороны треугольника A, B и C'); readln (a,b,c);
{сначала найдем меньшую, среднюю и большую сторону и присвоим их значения, соответственно, переменным x, y и z}
if a<b then if a<c then if b<c then begin x:=a; y:=b; z:=c end else begin x:=a; y:=c; z:=b end else begin x:=c; y:=a; z:=b end else if a>c then if b<c then begin x:=b; y:=c; z:=a end else begin x:=c; y:=b; z:=a end else begin x:=b; y:=a; z:=c end;
{Теперь узнаем, является ли треугольник разносторонним и остроугольным: Для этого сравним длины сторон между собой а также сумму квадратов меньших сторон с квадратом большей}
if ((x*x+y*y)>(z*z)) and (a<>b) and (a<>c) and (b<>c) then begin p:=(a+b+c)/2; // находим полупериметр s:=sqrt(p*(p-a)*(p-b)*(p-c)); // находим площадь треугольника writeln(x,' ',y,' ',z,' - могут быть сторонами остроугольного разностороннего треугольника'); writeln('Площадь этого треугольника = ',s) end else writeln(a:4,b:4,c:4,' - не могут быть сторонами остроугольного разностороннего треугольника') end.
1) Компьютер - ( англ.- вычислитель ) - это универсальное у-во для хранения, обработки и передачи информации. В настоящее время его основная работа - управление различными информационными функциями. 2)Табличный процессор, т.к. эта программа относится к прикладному ПО 3) СИСТЕМЫ ПРОГРАММИРОВАНИЯ, но не СИСТЕМНЫЕ ПРОГРАММЫ 4) А. 5) С. 6)С. Текстовые и графические редакторы относятся к прикладному ПО 7) Сложно найти ответ, но я знаю определение: ОС - система программ для управления ресурсами компьютера и организации взаимодействия с человеком. 8) Драйверы - программы, необходимые для работы разных устройств подключенных к компьютеру. Скорее Б 9)Не уверяю, но по моему А 10)К операционным системам? Этот вопрос я не поняла
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку