Артур
?>

Даны действительное число а и натуральное n. вычислить p=a*(a-n)*(a-2*n)**(a-n*n) с функции.!

Информатика

Ответы

Azat859
Var N: integer;
    A: real;
{ нахождение суммы ряда }
function Sum(A: real; N: integer) : real;
var i: integer;
    s: real;
begin
   s:=A;
   for i:=1 to N do   s:=s*(A-i*N);
   Result:=s;
end;
{ конец процедуры }
{ основная программа }
begin
  write('задайте N:  ');
  readln(N);
  writeln('задайте A:  ');
  readln(A);
  writeln('сумма ряда равна:  ',Sum(A,N));
end.
  
   
kseybar
Тим Бернерс-Ли 1980 году для собственных нужд написал программу «Энквайр» которая заложила концептуальную основу для Всемирной паутины. В 1989 году, работая в CERN над внутренней сетью организации, Тим Бернерс-Ли предложил глобальный гипертекстовый проект, теперь известный как Всемирная паутина. Официально годом рождения Всемирной паутины нужно считать 1989 год .Первый в мире веб-сайт был размещён Бернерсом-Ли 6 августа 1991 года.

Теоретические основы веба были заложены гораздо раньше Бернерса-Ли. Ещё в 1945 году Ванна́вер Буш разработал концепцию «Memex» — вс механических средств «расширения человеческой памяти» . Memex — это устройство, в котором человек хранит все свои книги и записи (а в идеале — и все свои знания, поддающиеся формальному описанию) и которое выдаёт нужную информацию с достаточной скоростью и гибкостью. Оно является расширением и дополнением памяти человека. Бушем было также предсказано всеобъемлющее индексирование текстов и мультимедийных ресурсов с возможностью быстрого поиска необходимой информации. Следующим значительным шагом на пути ко Всемирной паутине было создание гипертекста (термин введён Тедом Нельсоном в 1965 году) .
suhanowaswetlana
ответ на Ваш вопрос зависит от того, что Вы разрабатываете - Windows-приложение или консольное. В любом случае основная часть программы может быть, например, такой:
var f: file of real; a,b,r:real;
begin
AssignFile(f,'myFile.dat');
Reset(f);
Read(f,a);
while not eof(f) do read(f,b);
r:=a-b;
//здесь нужно вывести r
Close(f);
end;
Программа будет работать, если:
1. используется типизированный файл, который был создан ранее;
2. файл находится в той же папке, что и программа
3. если разрабатывается Windows-приложение, то приведенный текст должен быть внутри обработчика какого-либо события
4. для вывода результата на форму (в случае Windows-приложения) следует использовать какой-либо компонент из палитры (например, Label)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Даны действительное число а и натуральное n. вычислить p=a*(a-n)*(a-2*n)**(a-n*n) с функции.!
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

vasavto1
olgapotapova
Баканова1415
Дубровская571
alesia1986
d111180
Irina321t
Nataliatkachenko1
Pilotmi247074
Mikhailovich_Viktoriya
Абдулганиева Сергей
pokrov777krest
jurys71242
cheremetdiana
irschacha