Напишите программку, которая выводит на экран последний член последовательности 1,

Напишите программку, которая выводит на экран последний член последовательности 1, -3, -7, -11, -15... наименьший данного числа и его сумму с прошлыми членами последовательности

Задать свой вопрос
1 ответ
Program hhh54;
var n,x,s:longint;
begin
  s:=0;
  read (n);
  x:=1;
  while x gt; n do
    begin
      s:=s+x;
      x:=x-4;
    end;
  s:=s+x;
  write (x,' ',s);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт