сервис вопросов и ответовCnt1_3 Ввести n чисел, подсчитать, сколько среди них положительных, отрицательных и чисел больших 10.
5-9 класс|
|
27021996
05 окт. 2013 г., 23:35:59 (10 лет назад)
Udzumake2014
06 окт. 2013 г., 1:11:49 (10 лет назад)
var n,x,i,p,m,s:integer;
begin
writeln('Введите n: ');
readln(n);
for i:=1 to n do
begin
readln(x);
if x<0 then m:=m+1;
if x>0 then p:=p+1;
if x>10 then s:=s+1;
end;
writeln('Положительных: ',p);
writeln('Отрицательных: ',m);
writeln('Больше 10: ',s);
end.
Ответить
Другие вопросы из категории
Срочно!!! Главный редактор журнала отредактировал статью, и ее объем уменьшился на 2 страницы. Каждая страница содержит 32
строки, в каждой строке по 64 символа. Информационный объем статьи до редактирования был равен 2 мбайт. Статья представлена в кодировке Unicode, в которой каждый символ кодируется 2 байтами. Определите информационный объем статьи в Кб в этом варианте представления Unicode после редактирования.
Ребята Пожалуйста помогите! !!
Нужно написать слово МАМА с помощью команды на вектор
(Пожалуйста напишите координаты) СРОЧНО! !!
Числа 91, 52 перевести в двоичную восьмеричную и шеснадцатеричную систему счисления с проверкой. Плиз очень надо. Заранее спасибо.Урок скоро кончится
пожалуйста решите.
Читайте также
С клавиатуры вводятся 3 числа, подсчитать сколько среди них четных положительных чисел.
PS: использовать функцию деления по модулю:
a mod b- выдает остаток при делении числа а на число b
15 mod 2=1
15 mod 3=0
Помогите пожалуйста с ИВТ: 1.Случайным образом генерируется N целых чисел в диапазоне от -5 до 5. Посчитать сколько среди них положительных,
отрицательных, и не равных нуля. Задача решается через Turbo Pascal
1) В коробке лежат 32 клубка шерсти. Среди них 4 красных. Сколько информации несет сообщение о том, что достали клубок красной шерсти? 2) в
коробке лежат 64 цветных карандаша. Сообщение о том, что достали белый карандаш, несет 4 бита информации. Сколько белых карандашей было в корзине?
3) В ящике лежат перчатки(белые и черные). Среди них-две пары черных. Сообщение о том, что из ящика достали пару черных перчаток, несет 4 бита информации. Сколько всего пар перчаток в ящике?
ПОМОГИИИИТЕ
Вы находитесь на странице вопроса "Cnt1_3 Ввести n чисел, подсчитать, сколько среди них положительных, отрицательных и чисел больших 10.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.