Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

Напишите программу на языке Pascal.Элементы массива А, удовлетворяющие условию А(i)>5.5, переписать в массив В, а элементы, удовлетворяющие условию

10-11 класс

А(i)<=5.5, переписать в массив С. В массиве А m элементов.

Aliusha1050 19 февр. 2017 г., 18:23:46 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
AsunaSun
19 февр. 2017 г., 20:28:27 (7 лет назад)

 var
  A,B,C: array[1..100] of integer;
  i,n,j,k:integer;
begin
randomize;
j:=0;
k:=0;
Readln(n);
Writeln('Исходный массив:');
 for i:=1 to n do
  begin
   A[i]:=random(10);
   writeln('A[',i,']=',A[i]);
   end;
for i:=1 to n do
   if A[i]>5.5
    then  
     begin
       j:=j+1;
       B[j]:=A[i];
      end;
 for i:=1 to n do
  if A[i]<=5.5
  then 
    begin
     K:=k+1;
     C[k]:=A[i];
    end;
for i:=1 to j do
 writeln('B[',i,']=', B[i]);
for i:=1 to k do
 writeln('C[',i,']=', C[i]);
end.

Ответить

Другие вопросы из категории

В цехе трудятся рабочие трех специальностей – токари (Т), слесари (С) и фрезеровщики (Ф). Каждый рабочий имеет разряд не меньший второго и не больший пя

того. На диаграмме I отражено количество рабочих с различными разрядами, а на диаграмме II – распределение рабочих по специальностям. Каждый рабочий имеет только одну специальность и один разряд. Отметьте истинные высказывания:

1. В цехе трудятся 100 рабочих.

2. В цехе трудятся 50 слесарей.

3. В цехе трудятся 25 фрезеровщиков.

4. Все токари могут иметь 3 разряд.

5. Все рабочие третьего разряда могут быть токарями.

6. Все рабочие третьего разряда могут быть фрезеровщиками.

7. Все слесари могут иметь пятый разряд.

8. Все токари могут иметь четвертый разряд.

Задача F Оплата

Сегодня Али в местном магазине сделал покупку за С тенге. Он только хотел расплатится и услышал от продавца фразу "Без сдачи пожалуйста, молодой человек" . У него есть N монет достоинства а1, а2, ...., аN тенге. Определите, сможет ли он расплатится без сдачи.
формат входных данных
В первой строке входного файла записаны два целых числа С (1 ≤С ≤ 1000) и
N
(1 ≤ N ≤ 15)- общая сумма покупки и количество монет у Али соотвественно. Во второй строке записаны N целых чисел
а1, а2, ...., аN (1
≤ai ≤ 1000 )-достоинства монет Али.
Формат выходных данных
В единсвенной строке выведите слово "YES", если Али сможнт расплатится без сдачи. Иначе, выведите "NO"

Читайте также

Напишите на языках Pascal и C++ программу, которая генерирует 2 случайных вещественных числа и вычисляет их сумму, разность, произведение и

частное. Напишите на языках Pascal и C++ программу, моделирующую выбор одной из костей домино ( в наборе 28 костей домино, каждая состоит из двух половин, на каждой половине – от 0 до 6 очков). С помощью этой программы ответьте на вопрос: какова вероятность того, что выпадет кость с числом очков, кратным 3

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

углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.

1)напишите программу формирования массива размеров 5 х 5 с помощью датчика случайных чисел.замените в нем все четные значения элементов суммой

индексов элементов главной диагонали.Выведите на экран исходный и измененный массивы (программа на языке Паскаля)
2)Составьте программу формирования и вывода на экран одномерного массива, состоящего из удвоенных минимальных элементов строк двумерного массива, заданного с помощью датчика случайных чисел

дан целочисленный массив из 10 элементов все элементы которого целые числа в интервале от - 1000 до 1000. напишите программу которая находит количество

элементов всех нечетных элементов массива которые делятся на 3

на языке Pascal желательно



Вы находитесь на странице вопроса "Напишите программу на языке Pascal.Элементы массива А, удовлетворяющие условию А(i)&gt;5.5, переписать в массив В, а элементы, удовлетворяющие условию", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.