Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.69/13: Рейтинг темы: голосов - 13, средняя оценка - 4.69
0 / 0 / 0
Регистрация: 30.01.2019
Сообщений: 3
1

Подсчитать Y = n1 - n2 + n3 - n4 + n5 – n6 + n7 - n8 + n9 -n10...

30.01.2019, 22:14. Показов 2606. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Ввести N. Подсчитать Y = n1 - n2 + n3 - n4 + n5 – n6 + n7 - n8 + n9 -n10
0
Лучшие ответы (1)
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
31.01.2019, 10:17 2
Лучший ответ Сообщение было отмечено darkman2D как решение

Решение

Может так?
Y = n1 - n2 + n3 - n4 + n5 – n6 + n7 - n8 + n9 -n10

Добавлено через 8 минут
Если так, то
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var n,k,y:real;
    i:byte;
begin
write('n=');
readln(n);
y:=0;
k:=-1;
for i:=1 to 10 do
 begin
  k:=-k*n;
  y:=y+k;
 end;
write('y=',y:0:2)
end.
1
31.01.2019, 10:17
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru