• Вывести на экран первые N чисел последовательности: 8, 14, 20, 26, 32...
    Найти А1+А3+А5+А7+А9, где Ai - это i-ое число последовательности чисел.
    Написать ко второму заданию программу на Паскале с использованием while/repeat/for.

Ответы 5

  • Это первое, счас допишу второе
  • program p1;var i,n,s,s1:integer;begins:=8;n:=9;i:=1;repeatif not(i mod 2=0) then s1:=s1+s;i:=i+1;s:=s+6;until i=n;if not(i mod 2=0) then s1:=s1+s;writeln('А1+А3+А5+А7+А9=',s1,' ');end.
    • Автор:

      papito
    • 6 лет назад
    • 0
  • проверяйте
    • Автор:

      myahsdql
    • 6 лет назад
    • 0
  • Большое спасибо.
  • program p1;var i,n,s:integer;begins:=8;write('Введите n:');readln(n);for i:=2 to n dobeginwrite(s,' ');s:=s+6;end;writeln(s,' ');end.
    • Автор:

      tata24
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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