Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
artem1994
0 / 0 / 0
Регистрация: 11.10.2012
Сообщений: 15
1

Записать в таблицу сначала все положительные числа и нули, а потом все отрицательные

11.10.2012, 12:58. Просмотров 1265. Ответов 1
Метки нет (Все метки)

Дано линейную таблицу, которая содержит 25 действительных, записать в эту же таблицу сначала все положительные числа и нули, а потом все отрицательные, сохраняя порядок их следования.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.10.2012, 12:58
Ответы с готовыми решениями:

Записать в массив сначала все положительные, затем все отрицательные числа и нули
Пожалуйста докажите код выделенный в комментарии. Задание:"Дан массив вещественных чисел ,...

Переписать в пустой файл g сначала все положительные числа, а потом все отрицательные
Здравствуйте, не могли бы кто нибудь помочь с двумя задачами. P.S. прошу прощения что нарушил...

Расположить все элементы массива заданным образом: сначала все положительные, затем нули, затем отрицательные
Пожалуйста помогите, нужно решить 3 задачи 1. Дан массив А (25). Расположить все элементы в...

Определите процедуру p (х,у),которая создает массив, в котором сначала идут все положительные числа исходного, а потом все остальные
определите процедуру p (х,у),которая для данного массива х создает массив у,состоящий из элементов...

Записать все отрицательные числа из файла F в файл N, а все положительные в G.
Всем привет! Условие задачи: Дан файл F с числами от -20 до 20. Записать все...

1
CodeR
Фрилансер
3390 / 2791 / 3000
Регистрация: 08.02.2012
Сообщений: 7,273
Записей в блоге: 1
11.10.2012, 16:45 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Var A,B:array[1..100] of real;
    i,n,j:byte;
Begin
    write('Введите размерность: ');readln(n);
    For i:=1 to n do
    Begin
      A[i]:=random(31)-15;
      write(A[i]:4);
    End;
    B:=A;j:=1;
    For i:=1 to n do
     if B[i]>=0 then 
       Begin
         A[j]:=B[i];
         inc(j);
       End;
    For i:=1 to n do
     if B[i]<0 then 
       Begin
         A[j]:=B[i];
         inc(j);
       End;
    writeln;
    writeln('Преобразованный массив');
    For i:=1 to n do
     write(A[i]:4);
    readln;
End.
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.10.2012, 16:45

Вывести на экран сначала отрицательные числа, потом положительные
На вход программе подается последовательность целых чисел. В первой строке сообщается количество...

Напечатать сначала все отрицательные из чисел, затем - все положительные
пусть дано 100 чисел. напечатать сначала все отрицательные из них, за тем- все положительные.

Получить файлG , в который записать сначала положительные, затем отрицательные и потом нулевые компоненты файла
Создать числовой файл F . Получить файлG , в который записать сначала положительные, затем...


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

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

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