Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal процедуры и функции 1. Найти область допустимых значений аргумента x. 2. Написать процедуру или функцию, которая вычисляет область допустимых значений аргумента x. 3. Написать процедуру или функцию, которая... https://www.cyberforum.ru/ turbo-pascal/ thread1104320.html Вычислить значение функции Turbo Pascal
Как написать программу функций в Турбо Паскале 7? Можете показать примеры с решениями?
Turbo Pascal Вычислить выражение вычислить выражение https://www.cyberforum.ru/ turbo-pascal/ thread1104074.html Turbo Pascal Вставьте в эту задачу процедуру uses crt; var a,b,c,p,ha,hb,hc:real; s:string; k:integer; begin clrscr; repeat repeat write('Введите длину стороны а, положительное число a='); readln(s); https://www.cyberforum.ru/ turbo-pascal/ thread1103826.html
Для заданной функции f=Sin(2.8*x^2)+sqrt(1.2*x) вывести на экран значения функции Turbo Pascal
Для заданной функции f=Sin(2.8*x^2)+sqrt(1.2*x) вывести на экран значения функции,которые лежат в пределах от -1 до 2 и соответствующие им значения аргумента на отрезке x с шагом h=0.2. Помогите!
Turbo Pascal Из прямоугольника вырезается больший квадрат, найти количество квадратов полученных таких способом дан прямоугольник со сторонами А и В(натуральные числа)из прямоугольника вырезается больший квадрат,найти количество квадратов полученных таких способом(квадрат уменьшается,то есть из оставшийся... https://www.cyberforum.ru/ turbo-pascal/ thread1103604.html
Turbo Pascal Вычислить значение выражения Составить словесное (математическое) описание и блок-схему следующей задаче: вычислить значение выражения . Значения переменных вводятся с клавиатуры. При неправильном вводе значений, вывести на... https://www.cyberforum.ru/ turbo-pascal/ thread1103540.html Turbo Pascal Вычислить значение выражения используя цикл
y=x+(1+2)*x^2+(1+2+3)*x^3+(1+2+3+n)*x^n Помогите сделать программу вычисляющую знач выраж.
Turbo Pascal Напишите программу которая выводит на экран таблицу степеней двойки (от нулевой до десятой) https://www.cyberforum.ru/ turbo-pascal/ thread1103515.html
напишите программу которая выводит на экран таблицу степеней двойки (от нулевой до десятой).
Turbo Pascal Сортировка массивов. Объединить два кода uses crt; const n=8; var a,b:array of integer; i,k,j:integer; c:integer; begin clrscr; randomize; for i:=1 to n do begin a:=random(10); write(a:4); b:=a; end; https://www.cyberforum.ru/ turbo-pascal/ thread1103484.html
Текстовый обработчик с выравниваем текста по левому краю Turbo Pascal
Нужно создать в паскале текстовый обработчик с выравниваем текста по левому краю
Turbo Pascal Вычислить сумму элементов,лежащих на диагоналях матрицы MxM Вычислить сумму элементов,лежащих на диагоналях матрицы MxM (обратить внимание на четность-нечетность числа M) https://www.cyberforum.ru/ turbo-pascal/ thread1103386.html
23 / 23 / 17
Регистрация: 14.02.2014
Сообщений: 176
24.02.2014, 18:46 0

Вывести на экран монитора исходный одномерный массив в виде строки чисел - Turbo Pascal - Ответ 5823958

24.02.2014, 18:46. Показов 1295. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
29
30
program Proj2;
  var
    mas: array [1..10] of integer;
    i,j,n:Integer;
begin
 Writeln('Vvedite 10 elementov massiva:');
 for i:=1 to 10 do
 begin
  Readln(mas[i]);
 end;
  for i:=1 to 10 do
 begin
 Write(mas[i]);
 end;
 Readln;
  for j:=1 to 9 do
  for i:=1 to 10-j do
   if mas[i]>mas[i+1] then
    begin
     n:=mas[i];
     mas[i]:=mas[i+1];
     mas[i+1]:=n;
      end;
 Writeln('A vot i otsortirovanni massiv:');
     for i:=1 to 10 do
 begin
 Write(mas[i]);
 end;
 Readln;
end.


Вернуться к обсуждению:
Вывести на экран монитора исходный одномерный массив в виде строки чисел Turbo Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.02.2014, 18:46
Готовые ответы и решения:

Вывести на экран монитора исходный одномерный массив в виде строки чисел
ПОРЯДОК ВЫПОЛНЕНИЯ РАБОТЫ 1. Ввести одномерный массив поэлементно с помощью клавиатуры или...

Массив: Вывести на экран монитора исходный двухмерный массив в виде таблицы чисел.
Условие: 1. Ввести двухмерный массив поэлементно с помощью клавиатуры или получить его, ...

Одномерный массив заполнить целыми случайными числами и вывести на экран в виде строки
Не могли бы вы мне помочь??? 1.одномерный массив заполнить целыми случайными числами и вывести на...

Дан одномерный числовой массив. Увеличить значение каждого элемента на k и вывести изменный массив на экран монитора.
Добрового времени суток ! Задача: Дан одномерный числовой массив. Увеличить значение каждого...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.02.2014, 18:46
Помогаю со студенческими работами здесь

Вывести одномерный массив на экран в виде столбцов по 5 элементов
Дан одномерный массив из n элементов вывести его на экран в виде столбцов по 5 элементов. 1 6 2 7...

Вывести на печать исходный массив в виде матрицы и средние арифметические каждой строки матрицы с указанием номера строки
О великие знатоки паскаля, прошу у вас помощи Задача : Ввести двумерный массив 3х3. Вывести на...

Дан одномерный массив из n чисел. Вывести на экран, отсортирован ли массив по возрастанию
1. Дан одномерный массив из n чисел. Вывести на экран, отсортирован ли массив по возрастанию. 2....

Вывести массив на экран в виде таблицы, в конце каждой строки надо вывести минимальный элемент
Ребят , как вывести маленький элемент , что изменить в коде знак ">" меняю на "<" - не выходит. ...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru