Program abc;
var
n, i: integer;
s: real;
begin
write('Введите количество чисел: ');
readln(n);
for i := 1 to n do
s := s + 1 / i;
write('Сумма обратных чисел = ', s);
end.
Ответ: Всего 5 пунктов
1)прием и первичную обработку документов→
2)предварительное рассмотрение и распределение документов→
3)регистрацию→
4)рассмотрение документов руководством→
5)передачу на исполнение.
#include <iostream>
int main()
{
std::string name;
double years;
std::cout << "Введите имя и возраст: ";
std::cin >> name >> years;
std::cout << "Привет! " << name << " " << ". Ваш возраст(в мес.): " << years*12 << std::endl;
}
Ответ:
256 цветов
Объяснение:
где N - количество цветов,
i - количество бит
Var x, y:real;
Begin
Readln(x) ;
Y:=(sqr(a) +1)/sqrt(sqr(a)+1)
Write(y);
End.