Напишите программу, определяющую сумму всех нечетных чисел от 1 до 99. Паскаль. На основе integer - Компьютерные вопросы

Вопрос Напишите программу, определяющую сумму всех нечетных чисел от 1 до 99. Паскаль. На основе integer

Регистрация
26 Дек 2013
Сообщения
91
Репутация
0
Спасибо
0
Монет
0
Напишите программу, определяющую сумму всех нечетных чисел от 1 до 99. Паскаль. На основе integer
 
Регистрация
4 Дек 2013
Сообщения
97
Репутация
0
Спасибо
0
Монет
0
Юный Гаусс сделал это даже без клочка бумаги и уголька, чтобы писать на нем, а нонишнему поколению на такую безделицу нужон ажно целай комплуктер, вы полюбуйтесь только.
 

tob

Capitan

tob

Capitan
Регистрация
20 Окт 2013
Сообщения
91
Репутация
0
Спасибо
0
Монет
0
var i, sum:integer; begin For i:=1 to 99 do if i mod 2=1 then sum+=i; Writeln(sum); end. У меня на паскале получилось 2500
 
Регистрация
22 Ноя 2013
Сообщения
81
Репутация
0
Спасибо
0
Монет
0
Пожалуйста имейте ввиду, что этот пользователь забанен
int temp = 0; for (int i = 1; i < 100; i++) { (i % 2) ? temp += i : temp; } я думаю не трудно переписать тоже самое на паскале.
 
Сверху Снизу