• Pascal, цикл для, составить программу
    Ввести целое число N. Найти сумму первых N чётных натуральных чисел.

Ответы 1

  • var n,i,s:integer;beginwrite('n = ');readln(n);s:=0;for i:=1 to n do s:=s+2*i;writeln('s = ',s);end.Пример:n = 5s = 30
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years