Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
nail2024
0 / 0 / 0
Регистрация: 22.11.2009
Сообщений: 41
#1

Вычислить сумму всех нечетных чисел в диапазоне от 1 до N - Turbo Pascal

10.02.2010, 21:34. Просмотров 1338. Ответов 1
Метки нет (Все метки)

Вычислить сумму всех нечетных чисел в диапазоне от 1 до N
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.02.2010, 21:34
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вычислить сумму всех нечетных чисел в диапазоне от 1 до N (Turbo Pascal):

Массив. Вычислить сумму всех двузначных нечетных чисел - Turbo Pascal
Нужно составить программу для вычисления суммы всех двузначных нечетных чисел, именно массив! Сумма должна быть равна 2475, а у меня 2573,...

В диапазоне от 1 до N найти произведение четных и сумму нечетных чисел - Turbo Pascal
В диапазоне от 1 до N найти произведение четных и сумму нечетных чисел

В диапазоне от 1 до N найти произведение четных и сумму нечетных чисел - Turbo Pascal
В диапаоне от 1 до N найти произведение четных и сумму нечетных чисел P.S надо сделать через while или repeat!

С помощью оператора while напишите программу определения суммы всех нечетных чисел в диапазоне от 1 до 99 включительно. - Turbo Pascal
Помогите кто может найти решения!!! С помощью оператора while напишите программу определения суммы всех нечетных чисел в диапазоне от...

сумма всех нечетных чисел в диапазоне от 1 до 99 - Pascal
Написать программу определения суммы всех нечетных чисел в диапазоне от 1 до 99 включительно.Через оператор For. С блок-схемой. Очень...

Определение суммы всех нечетных чисел, кратных 3 в диапазоне от 1 до 99 включительно - Pascal
Напишите программу определения суммы всех нечетных чисел, кратных 3 в диапазоне от 1 до 99 включительно.

1
yanyk1n
4331 / 1462 / 152
Регистрация: 12.03.2009
Сообщений: 5,310
10.02.2010, 21:35 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var i,n,s:integer;
begin
 clrscr;
 write('N-> ');
 readln(n);
 s:=0;
 for i:=1 to n do if i mod 2=1 then s:=s+i;
 writeln(s);
 readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.02.2010, 21:35
Привет! Вот еще темы с ответами:

Найти сумму нечетных чисел файла в заданном диапазоне - Pascal
1.​Программно создать текстовый файл из N целых чисел. N: 20-80, числа создать с помощью датчика случайных чисел в диапазоне , k- номер...

Найти сумму всех четных, вводимых с клавиатуры, чисел и произведения всех нечетных - Turbo Pascal
найти сумму всех четных, вводимых с клавиатуры, чисел и произведения всех нечетных.

Дана последовательность из n-чисел.Найти сумму всех чисел,начиная с 5-го числа и вычислить сумму первых 4-х чисел. - Turbo Pascal
Дана последовательность из n-чисел.Найти сумму всех чисел,начиная с 5-го числа и вычислить сумму первых 4-х чисел. На С++ уже бы...

Вводится последовательность из n целых чисел найти сумму всех нечетных чисел - Pascal
Вводится последовательность из n целых чисел найти сумму всех нечетных чисел Помогите пожалуйста я немного не понял


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.