svetlana81kolesnik
30.04.2022 04:26

2. Напишите программу для нахождения процента от числа. Алгоритм Ввести число (целое число) Ввести процент (целое число) Совершить подсчеты Вывести на экран полученный результа​


2. Напишите программу для нахождения процента от числа. Алгоритм Ввести число (целое число) Ввести п

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
котеенок1233
18.01.2021 06:30

#define _USE_MATH_DEFINES

#include <iostream>

#include <math.h>

using namespace std;

int main()

{

 double a, b, alpha, s;             // объявления переменных

 setlocale(LC_ALL, "Russian");

 cout << "\nБольшее основание: ";   // ввод с клавиатуры

 cin >> a;

 cout << "\nМеньшее основание: ";

 cin >> b;

 cout << "\nУгол при большем основании: ";

 cin >> alpha;

 s = a * b / sin(alpha * M_PI / 180);  // расчет площади трапеции , * M_PI / 180 для перевода градусов в радианы

 cout << "\nПлощадь трапеции = " << s;

}

Объяснение:

#define _USE_MATH_DEFINES

#include <math.h>

эти две строки для M_PI, можно просто заменить на 3.14

0,0(0 оценок)
Ответ:
135790246anna
26.09.2021 07:08
Const n=10;
type ar=array[1..n] of integer;
procedure p1(var x:ar);
var i:integer;
begin
for i:=1 to n do x[i]:=random(51); 
end;

procedure p2(h:char;var x:ar);
var i:integer;
begin
writeln('---',h,'---');
for i:=1 to n do write(x[i]:4);
writeln; 
end;

procedure p3(var x:ar; var min,imin:integer);
var i:integer;
begin
min:=x[1]; imin:=1;
for i:=2 to n do
 if x[i]<min then begin min:=x[i]; imin:=i; end;
end;

var a,b : ar; 
  m1,m2,im1,im2: integer;
begin
Randomize; 
p1(a); p2('a',a);
p3(a,m1,im1);
writeln('m1=',m1,' im1=',im1);
p1(b); p2('b',b);
p3(b,m2,im2);
writeln('m2=',m2,' im2=',im2);
if im2<n 
 then begin b[im2+1]:=m1; p2('b',b); end
 else writeln('Минимальный элемент последний');
end.

Пример:
---a---
  13  11   4  48  36  25   9  47  40   8
m1=4 im1=3
---b---
  45  13  48  18  41  17   5  43   9  21
m2=5 im2=7
---b---
  45  13  48  18  41  17   5   4   9  21
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота