сервис вопросов и ответовподсчитать количество отрицательных чисел среди чисел а,б,с.(программирование ветвящихся алгоритмов)
5-9 класс|
|
Steelrayy
24 янв. 2014 г., 18:32:44 (10 лет назад)
SunriseA
24 янв. 2014 г., 21:16:50 (10 лет назад)
var
a, b, c: real;
count : byte;
begin
read (a, b, c);
count := 0;
if a < 0 then inc (count);
if b < 0 then inc (count);
if c < 0 then inc (count);
wrireln (count);
end.
Ответить
Другие вопросы из категории
Помогите написать программу для Паскаля.
1. Написать программу нахождения произведения n чисел.
Алфавит языка «амба-карамба» состоит из 2 букв. Сколько различных четырехбуквенных слов можно
образовать в этом языке?
Какой пункт не является действием к выполнению основных файловых операций:
А) копирование;
B) переименование;
C) форматирование;
D) удаление.
Читайте также
Помогитеее!! срочно нужно !
Разработать программу для подсчета количества отрицательных чисел среди целых чисел a, b, c. Программа должна иметь дружественный интерфейс. Протестировать программу для всех возможных случаев (когда количество отрицательных чисел равно 0, 1, 2 и 3).
Подсчитать количество четных чисел среди чисел a,b,c.
Написать программу в Pascal.
1)В диапазоне от 0 до 100 подсчитать количество чисел оканчивающихся на 3.
2)В диапазоне от 0 до 50 подсчитать количество чисел сумма цифр которых равна 3.
1)дан массив. найти сумму положительных и нечетных и количество отрицательных четных элементов
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
Вы находитесь на странице вопроса "подсчитать количество отрицательных чисел среди чисел а,б,с.(программирование ветвящихся алгоритмов)", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.