Определите и выведите на экран сумму нечётных двузначных чисел - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.67/9:

@Вася0009 0 / 0 / 0 Регистрация: 28.02.2014 Сообщений: 8

	Определите и выведите на экран сумму нечётных двузначных чисел 19.03.2014, 09:58. Показов 1862. Ответов 2 Метки нет (Все метки) определите и выведите на экран сумму нечётных двузначных чисел. Попроще код. 0

Лучшие ответы (1)

Сообщение: #5920157

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

19.03.2014, 09:58

Ответы с готовыми решениями:

Определите и выведите на экран множество целых чисел находящихся одновременно в строках массива
Определите и выведите на экран множество целых чисел находящихся одновременно в строках массива 2х5 заполненного с...

Определите и выведите на экран средний рост мальчиков
Информация о росте учащихся одного класса задана в виде массива. Рост девочек кодируется знаком «+» (плюс), рост мальчиков – знаком «-»...

Определите, есть ли в списке однофамильцы и выведите на экран их имена и отчества
Напишите программу, которая заполняет с клавиатуры массив 3 на 5 фамилиями, именами и отчествами(фамилии в первой строке, имена во второй,...

Romalei

109 / 50 / 55

Регистрация: 17.09.2013

Сообщений: 298

19.03.2014, 10:02

Сообщение было отмечено Вася0009 как решение

Решение

Pascal
1
2
3
4
5
6
7
var
i,a:integer;
begin
for i:=10 to 99 do
 if odd(i) then a:=a+i;
writeln(a);
end.

APALoff

1648 / 1077 / 1081

Регистрация: 03.07.2013

Сообщений: 4,507

19.03.2014, 10:43

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
i,a:integer;
begin
  a:=0;
  i:=11;
  While i<100 do
  Begin
    a:=a+i;
    Inc(i,2);
  End;
writeln(a);
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

19.03.2014, 10:43

Помогаю со студенческими работами здесь

Определите и выведите на экран, сколько раз температура опустилась ниже 0
1.Даны два массива: А(5) и В(5). Сформируйте массив С(10), предварительно определив его длину, включая на четные места элементы из массива...

Определите и выведите на экран, сколько раз температура была ниже среднемесячной.
Информация о средней суточной температуре воздуха за месяц задана в виде массива. Определите и выведите на экран, сколько раз температура...

Последовательности чисел. Найти сумму и произведение отрицательных двузначных чисел
Вводится 25 чисел. найти сумму и произведение отрицательных двузначных чисел

Дана матрица целых чисел размером 4x4. Определите сумму элементов, расположенных выше главной диагонали. Результат вывести на экран монитора
Дана матрица целых чисел размером 4x4. Определите сумму элементов, расположенных выше главной диагонали. Результат вывести на экран ...

Вводится 10 чисел. Найти сумму положительных двузначных чисел
Вводится 10 чисел. Найти сумму положительных двузначных чисел.

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Команды "Заполнить" и "Очистить" на форме документа Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .	Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .

Наверх