Найти количество введенных в переменную значений - PascalABC.NET

PascalABC.NET

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

Войти

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

Рейтинг 4.86/7:

@Bleach7x7 1 / 1 / 0 Регистрация: 28.04.2016 Сообщений: 23

	Найти количество введенных в переменную значений 06.09.2016, 07:49. Показов 1402. Ответов 1 Метки нет (Все метки) ввести число a>0 вводить в переменную b числа до тех пор пока не будет введено число значение которого меньше a. Найти количество введенных в переменную b значений. 0

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

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

IT_Exp

Эксперт

34794 / 4073 / 2104

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

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

Блог

06.09.2016, 07:49

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

Найти произведение положительных, сумму и количество отрицательных из 8 введенных целых значений
. Найти произведение положительных, сумму и количество отрицательных из 8 введенных целых значений.

написать программу,которая вводит произвольное число значений в переменную z и находит среднее арифметическое всех введённых значений кроме отрицатель
написать программу,которая вводит произвольное число значений в переменную z и находит среднее арифметическое всех введённых значений кроме...

bormant

Модератор

7816 / 4635 / 2837

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

Сообщений: 13,159

Записей в блоге: 1

06.09.2016, 08:01

Сообщение было отмечено Bleach7x7 как решение

Решение

Pascal
1
2
3
4
5
6
var a, b, n: Integer;
begin
  repeat Write('a: '); Read(a); until a>0; n:=0;
  repeat Write('b: '); Read(b); Inc(n); until b<a;
  WriteLn(n);
end.

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

BasicMan

Эксперт

29316 / 5623 / 2384

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

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

Блог

06.09.2016, 08:01

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

Описать процедуру Minmax(x,y) записывающую в переменную Х минимальное из значений Х и Y, а в переменную Y – максимальное из этих значений.
Описать процедуру Minmax(x,y) записывающую в переменную Х минимальное из значений Х и Y, а в переменную Y – максимальное из этих значений...

Описать процедуру Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B — максимальное из этих значений
В заданиях данной подгруппы требуется реализовать процедуры или функции с числовыми параметрами типа integer и real. Входные параметры этих...

Найти сумму массива, кроме значений введенных элементов
Дан массив размера N и два числа А и В (A<B). Вывести сумму всех элементов массива, кроме тех, которые находятся между этими числами.

Найти сумму двух наибольших значений (среди введенных трех)
Помогите пожалуйста

Найти количество нечетных чисел из введенных.
С клавиатуры вводятся числа до тех пор пока не введнго число 3. Найти количество нечетных чисел из введенных. Заранее спасибо.

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

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

Новые блоги и статьи Все статьи Все блоги /
1С: Программный отбор элементов справочника Номенклатура по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор под наименованию группы (на. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника Сотрудники по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .

Наверх