Вычислите на компьютере значение функции: s=1+3+5..+n. Произведите вывод значений начальных

Вычислите на компьютере значение функции: s=1+3+5..+n. Произведите вывод значений исходных данных и результатов расчета. На Pascal.Turbo

Задать свой вопрос
1 ответ
Var
 a,n,i,k:integer;
Begin
   Readln(n);
   k:=0;
   For i:=1 to N do
       if i mod 2=1 then k:=k+i;
   Writeln(k);
End.

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


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

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

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

Войти на сайт