РЕШИТЕ ПОЖАЛУЙСТА СРОЧНО Необходимо!!!!!!!!

РЕШИТЕ ПОЖАЛУЙСТА Безотлагательно НУЖНО!!!!!!!!

Задать свой вопрос
Вячеслав Поречный
на паскале записать ?
Альбина
да
Dashka
Спасибо огромное
София Големова
число повторений вводится само да ?
Евгений Шувайлов
вроде да
Константин Забатурин
дп
Эмилия
да*
1 ответ

program p1;

uses crt;    выводит окошка, где будет результат

var a,n,i:integer;

  s:real;

begin  

read(n);

  s:=0;

 a:=0;

 for i:=1 to n do begin

 a:=a+2;    

  s:=s+1/a;

  end;

  write(s);

  end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт