Cnt2_1 Ввести 5 чисел, подсчитать количество чисел принадлежащих интервалу (-10 ; -5 ].
5-9 класс
|
Bobercond
10 авг. 2014 г., 5:19:35 (9 лет назад)
Терехова97
10 авг. 2014 г., 8:10:53 (9 лет назад)
var x,i,s:integer;
begin
for i:=1 to 5 do
begin
readln(x);
if (x>-10) and (x<=-5) then s:=s+1;
end;
writeln('Ответ: ',s)
end.
Ответить
Другие вопросы из категории
Задача: Написать программу вычисления суммы всех двузначных чисел
S=10+11+12+...+99
для QBasic
игорь получил алгоритм для нахождения кода числового замка "В последовательности цифр к каждой цифре строящей на нечетной позиции прибавить 1 и из каждой
цифры стоящей на четной позиции отнять 2. затем вычеркнуть каждую 3 цифру. какой код должен получиться если применить данный алгоритм к последовательности цифр 1567327
Укажите правильный вариант неполного ветвления
A. THEN<серия оператора 1> ELSE<серия оператора 2>;
B. IF<условие> ELSE<серия оператора 2> end ;
C. IF<условие> THEN<оператор>;
D. ELSE<серия оператора 2> IF<условие>:
Читайте также
1)В диапазоне от 0 до 100 подсчитать количество чисел оканчивающихся на 3.
2)В диапазоне от 0 до 50 подсчитать количество чисел сумма цифр которых равна 3.
Вы находитесь на странице вопроса "Cnt2_1 Ввести 5 чисел, подсчитать количество чисел принадлежащих интервалу (-10 ; -5 ].", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.