С Новым годом! Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Дана матрица B размером 7х7. Преобразовать её так, чтобы минимальные элементы строк оказались на главной диагонали Буду благодарен тем, кто поможет 2) Дана матрица B размером 7х7. Преобразовать её так, чтобы минимальные элементы строк оказались на главной диагонали. https://www.cyberforum.ru/ turbo-pascal/ thread1128260.html В заданной целочисленной матрице А размером MxN (m,n<=8). Определить кол-во строк состоящих только из нулей Turbo Pascal
Буду благодарен тем, кто поможет 1) В заданной целочисленной матрице А размером MxN (m,n<=8). Определить кол-во строк состоящих только из нулей.
Turbo Pascal Найти среднее арифметическое наибольшего и наименьшего элементов массива Огромная просьба помочь 1) Дан массив B из n элементов (n<40). Найти среднее арифметическое наибольшего и наименьшего элементов массива. https://www.cyberforum.ru/ turbo-pascal/ thread1128234.html Turbo Pascal ПОБУДОВИ ГРАФІКІВ ФУНКЦІЙ НА ЗАДАНОМУ ІНТЕРВАЛІ y= 8arccos(0,1x)/πі на інтервалі: лівий інтервал (-10), правий (+ 10) https://www.cyberforum.ru/ turbo-pascal/ thread1128208.html
Графика в Паскаль Turbo Pascal
Вывести на экран монитора две вертикально расположенных строки текста длиной не больше двадцати символов таким образом, чтобы они периодически менялись своими местами 		Turbo Pascal Типізований файл Створити типізований файл, який утримує декілька рядків тексту, після чого вивести ці рядки тексту з типізованого файла на екран монітора по одному байту https://www.cyberforum.ru/ turbo-pascal/ thread1128206.html
Turbo Pascal Движение графического объекта Помогите, пожалуйста, организовать движение графического объекта по экрану: летящая шайба. https://www.cyberforum.ru/ turbo-pascal/ thread1128202.html Возникает ошибка "error 207 invalid floating point operation" Turbo Pascal
Здраствуйте всем, прошу помочь мне. Сам я не ахти в этом шарю. ВОзникает ошибка error 207 invalid floating point operation. Место где возникает ошибка выделено жирным цветом Вот код: Program lab3; var x,x1,y,d:real; begin writeln('vvedite nachalo posledovatelnosty'); readln(x); writeln('vvedite konec posledovatelnosty'); readln(x1);
Turbo Pascal Даны действительные числа х, у, z. Составить программу, вычисляющую min (5x, 2y, 3z) Даны действительные числа х, у, z. Составить программу, вычисляю- щую min (5x, 2y, 3z) Добавлено через 57 секунд ребят, еще вторая задачка Даны целые числа а, b, с и d. Составить программу, печатающую те из них, которые делятся на 3 https://www.cyberforum.ru/ turbo-pascal/ thread1128104.html Turbo Pascal Организовать вещественные файлы А и В с одинаковым количеством компонентов. Получить файл С, компоненты которого определяются по правилу https://www.cyberforum.ru/ turbo-pascal/ thread1128053.html
Помогите пожалуйста! Организовать вещественные файлы А и В с одинаковым количеством компонентов. Получить файл С, компоненты которого определяются по правилу С(i)= min(A(i),B(i)).
Вывод текста по условию Turbo Pascal
как создать текст в паскале который будет выводиться только в том случае когда на него будут ссылаться(goto либо как то по-другому)? 		Turbo Pascal Сформировать одномерный массив из главной диагонали матрицы. Найти ошибку в программе https://www.cyberforum.ru/ turbo-pascal/ thread1127979.html
Здравствуйте, товарищи уже битый час не могу разобраться в программе,по условию нужно сделать одномерный массив из главной диагонали матрицы при условии ,что в матрице не больше двух строк содержащих нули.И да нужно сделать с несколькими функциями или процедурами вот мои наработки ,вот сделал ,но прога не работает ,да и сам понимаю что я что-то скорее всего конкретно напутал :help: const...
23 / 23 / 22
Регистрация: 20.03.2014
Сообщений: 36
24.03.2014, 14:46 0

Даны два целочисленных массива С из 10 элементов и D из 12 элементов. Получить все элементы массива C, которые входят в массив D - Turbo Pascal - Ответ 5943974

24.03.2014, 14:46. Показов 2622. Ответов 3
Метки (Все метки)

Ответ

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
31
32
33
34

const
  n=10;
  m=12;
var
  c: array [1..n] of integer;
  d: array [1..m] of integer;
  i,j: integer;
  fl: boolean;
begin
  randomize;
  writeln('Массив C: ');
  for i:=1 to n do
    begin
      c[i]:=random(21)-10;
      write(c[i]:5);
    end;
  writeln;
  writeln('Массив D: ');
  for i:=1 to m do
    begin
      d[i]:=random(21)-10;
      write(d[i]:5);
    end;
  writeln;
  writeln('Элементы С, которые входят в D: ');
  for i:=1 to n do
    begin
      fl:=false;
      for j:=1 to m do
        if c[i]=d[j] then fl:=true;
      if fl then write(c[i]:5);
    end;
  writeln;
end.


Вернуться к обсуждению:
Даны два целочисленных массива С из 10 элементов и D из 12 элементов. Получить все элементы массива C, которые входят в массив D Turbo Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 24.03.2014, 14:46
Готовые ответы и решения:

Дано два целочисленных массива. Посчитать сколько элементов входят в один массив но не входят в другой
1. Дано натуральное число n, посчитать количество пар x,y при которых: x^2+y^2 &lt; n X y целые...

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

Даны два массива чисел. Найти и записать в множество элементов все элементы массивов, которые не имеют совпадений (логич
Даны два массива чисел. Найти и записать в множество элементов все элементы массивов, которые не...

Даны два массива. Найти наименьшее число из первого массива среди чисел, которые не входят в первый массив
Даны два массива. Найти наименьшее число из первого массива среди чисел, которые не входят в первый...

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

Получить третий массив, в который входят все элементы первого массива и те элементы второго, которые не встречались в первом
Задача по теме &quot;массив&quot;. &quot;Объединение массивов&quot;. Напишите программу, которая запрашивает и вводит...

Даны два массива а и b, получить массив С содержащий все элементы из a и b без повторений (Паскаль)
Задача вроде простая, но я не пойму как мне изменить размер массива C при добавлении в него...

Даны два целочисленных массива K(m) и L(n). Найти максимальный элемент среди одинаковых элементов массивов K и L
Даны два целочисленных массива K(m) и L(n). Найти максимальный элемент среди одинаковых элементов...

Получить все члены массива А, которые не входят в массив В.
Дано два целочисленных массива: А из 15 элементов и B из 10 элементов. Получить все члены массива...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru