Практична робота 9 Складання програм на введення та виведення даних
Вправа 1. Подарункова коробка
Завдання. З комп'ютерного диска (діаметр 120 мм) восьмикласники яка
виготовили квадратну заготовку для сувеніру. Складіть програму, визначатиме сторону подарункової коробки для цього сувеніру.
Виконайте програму для наступних значень:
Діаметр диска (мм)
120
240
450
Сторона коробки (мм)
Запишу сразу в виде готовой программы:
var
x, a, b, c, d: real;
begin
x := 0.33;
a := Log10(Exp(x + 2));
b := 2 * Pi / Tan(45 * Pi / 180);
c := 3.14 * ArcSin(x);
d := Sqr(Tan(Sqr(x))) + Exp(Cos(x));
Writeln(a);
Writeln(b);
Writeln(c);
Writeln(d);
end.
Здесь в примере b, котангенс 45 -видимо имеется ввиду градусов (и поэтому там умножено на Pi / 180, чтобы перевести в радианы- ведь в Паскале все тригонометрические функции используют радианы). Но, если это имеется ввиду 45 радиан, то этот множитель нужно убрать.
Там же, вместо котангенса используется единица делённая на тангенс (т.к. функции котангенса в Паскале вроде нет).
Ну, можно и выписать оттуда сами выражения отдельно, как просят в задаче (только работать вне программы это всё равно не будет):
a) Log10(Exp(x + 2))
b) 2 * Pi / Tan(45 * Pi / 180)
c) 3.14 * ArcSin(x)
d) Sqr(Tan(Sqr(x))) + Exp(Cos(x))
Код программы:
#include <iostream>
#include <locale>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
int *a, N, sum, numb;
cout << "Введите количество чисел: ";
cin >> N;
a = new int[5];
cout << "Введите "<<N<<" чисел:"<<endl;
for (int i = 0; i < N; i++)
cin >> a[i];
numb = 0;
sum = a[0] + a[1];
for (int i = 2; i < N; i++) {
if (a[i] > sum) {
numb = i;
break;
}
else {
sum += a[i];
}
}
if (numb != 0)
cout <<"Номер числа: "<< ++numb << endl;
else
cout << "Такого числа нет" << endl;
}