Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
ValdisZ
0 / 0 / 0
Регистрация: 13.04.2010
Сообщений: 17
1

сколько чисел массива меньше 20?

13.04.2010, 21:40. Просмотров 838. Ответов 2
Метки нет (Все метки)

Дан массив из 20 целых чисел который взят промежуток [10;70]. Выяснить сколько чисел массива меньше 20?
Плизз помагите, если кто то есть, завтра здавать надо, а я другу обещал) То он английский делает а я информатику)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.04.2010, 21:40
Ответы с готовыми решениями:

Определить сумму чисел меньше P,произведение чисел больше H и кол-во чисел в диапозоне значений P и H
ПОМОГИТЕ ПОЖАЛУЙСТА!!))) даны число P и H.Определить сумму чисел меньше...

Определить сумму чисел меньше P,произведение чисел больше H и кол-во чисел в диапозоне значений P и H
ПОМОГИТЕ!!!!! даны число P и H.Определить сумму чисел меньше P,произведение...

Определить во сколько раз число A меньше B
Задача 1. Даны два целых числа A и B (A<B). Определить во сколько раз A<B....

В последовательности из 10 чисел посчитать количество чисел меньше 8
В последовательности из 10 чисел посчитать количество чисел меньше 8 Решите...

определить, сколько его элементов имеют значение меньше чем 0,25
Дан массив А (5;4) определить, сколько его элементов имеют значение меньше чем...

2
yanyk1n
4331 / 1463 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
13.04.2010, 21:43 2
Лучший ответ Сообщение было отмечено ValdisZ как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
const n=20;
vat a:array[1..n]of integer;
i,k:integer;
begin
 clrscr;
 for i:=1 to n do
 begin
  a[i]:=10+random(61);
  write(a[i],' ');
 end;
 k:=0;
 for i:=1 to n do if a[i]<20 then inc(k);
 writeln(k);
 readln;
end.
1
ValdisZ
0 / 0 / 0
Регистрация: 13.04.2010
Сообщений: 17
13.04.2010, 22:18  [ТС] 3
Киря выручай давай)

Добавлено через 15 секунд
Ща попробуем)

Добавлено через 44 секунды
Он ответы то пишет, но чет всякий раз разные

Добавлено через 1 минуту
ОГО круть мы uses crt;
const n=20; мы такого еще не изучали!)

Добавлено через 27 минут
СпАсИбО ОГРОМНОЕ
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.04.2010, 22:18

Ввести 3 числа x,y,z. Если сумма трех попарно различных чисел x,y,z меньше 1, то наименьшее из этих чисел заменить полусуммой двух других ; в противно
Ввести 3 числа x,y,z. Если сумма трех попарно различных чисел x,y,z меньше 1,...

Сумма 1-го элемента массива и элементов массива, начиная с четвёртого, которые меньше или равны первому элементу
Что здесь высчитывается и какой ответ? var k,m: integer; dat: array of...

Посчитать,сколько элементов массива равны 5 или сколько 5 в массиве
Посчитать,сколько элементов массива равны 5 или сколько 5 в массиве ...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru