Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal В матрице уплотнить все четные элементы в направлении, указанном на рисунке https://www.cyberforum.ru/ pascal/ thread24579.html В матрице А(N,N) уплотнить все четные элементы в направлении указанном на рисунке. Остальные элементы сделать равными нулю. Если решение задачи критично к факту четности/не¬четности числа столбцов или строк, студент сам выбирает этот параметр.Полученные результаты должны быть занесены в последовательный файл и доступны для просмотра из него.	Pascal решите пожалуйста билет по паскалю Помогите дорешать билет по паскалю пож ... я в нём не силён (( а скоро нада на экзамен №1 1)Составьте программу, которая: запрашивает значение переменной х и шага n; выводит значение функции http://pic.ipicture.ru/uploads/090228/zRz1EfGsaI.jpg в точках x, x+n, x–n. Протокол работы программ ы: x= -2.3 n= 0.6 f(-2.3)= 3.026 f(-1.7)= 4.673 f(-2.9)= 2.542 2)Составьте программу, которая:...
Pascal записи, массивы записей Вывести список студентов, которые получили двойки за второй экзамен https://www.cyberforum.ru/ pascal/ thread24562.html	Pascal программирование разветвленных вычисляемых процессов https://www.cyberforum.ru/ pascal/ thread24553.html программирование разветвленных вычисляемых процессов
Pascal В матрице А (m x n) найти столбец и рядок, который содержит максимальный и минимальный за модулем элементы В матрице А (m x n) найти столбец и рядок, который содержит максимальный и минимальный за модулем элементы	Pascal В каждом столбце матрицы А размера nn поменять местами минимальный элемент и элемент, находящийся на побочной диагонали Собственно, вот в чем дело. Я написал 3 программы, но написал неграмотно. Преподаватель сказал, что нужно их структурировать. Далее привожу тексты программ и пожелания преподавателя. 1) Написать и протестировать функцию для решения следующей задачи. В каждом столбце матрицы А размера nn поменять местами минимальный элемент и элемент, находящийся на побочной диагонали.(Структурировать. Сделать... https://www.cyberforum.ru/ pascal/ thread24546.html
Pascal Используя рекурсию для заданного N вычислите значение... https://www.cyberforum.ru/ pascal/ thread24523.html Помогите плз с задачкой,незнал как написать нижние значения по этому вот скриншотик---->http://foto.dreamhost.by/pic_b/09/02/26/c7d9289498ad75356e9ffbd9f54ee3c7.jpg посмотрите плиз)))	Pascal Программа проверки пароля Доступ в соответствии с паролями. var x:integer; begin write('Vvesti parol : '); readln(x); if (x=9583) or (x=1747) then writeln('Dostyp A,B,C') else if (x=3331) or (x=7922) then writeln('Dostyp B,C') else
Pascal Вывести на экран только буквы Интересует, как вывести на экран только буквы, при любых нажатии клавиш? Ещё, как вывести только буквы русского алфавита? Выводи все символы: for A:=255 downto 0 do writeln('code simbol = ',A,'simbol = ',chr(A)); Может нужно как-то отсортировать? https://www.cyberforum.ru/ pascal/ thread24510.html	Pascal программа в Pascal показывающая меткость стрелка Вот программа, кто может сделать прошу пожалуйста мне помочь, буду вам очень благодарен!:) Написать программу, которая формирует массив, состоящий из значений показателя меткости стрелка в процентном соотношении после каждого выстрела, если известно, что стрелок произвел n выстрелов, а результаты каждого выстрела хранятся в линейном массиве в виде нулей(мимо) и единиц(попадание). https://www.cyberforum.ru/ pascal/ thread24496.html
Pascal Вывести на экран те элементы заданного массива, которые расположены после максимального элемент Написать программу, которая выводит на экран те элементы заданного массива, которые расположены после максимального элемента всего массива. Пожста помогите,кто- нибудь буду очень благодарен:):good:	Pascal Написать программу,которая упорядочивает по возрастанию только те элементы заданной последовательности, последняя цифра которых не равна К https://www.cyberforum.ru/ pascal/ thread24491.html Помогите пожалуйста решить программу, очень нужно.Заранее спасибо! Написать программу,которая упорядочивает по возрастанию только те элементы заданной последовательности, последняя цифра которых не равна К.

Puporev

Почетный модератор

64300 / 47595 / 32743

Регистрация: 18.05.2008

Сообщений: 115,181

28.02.2009, 15:27

Верно ли что все члены последовательности a1 .. a25 входят в последовательность b1...bn - Pascal - Ответ 109322

28.02.2009, 15:27. Показов 3026. Ответов 8

Метки (Все метки)

Ответ

По N ни каких ограничений нет? А то при N<25 точно нет.

Добавлено через 3 минуты 46 секунд
И обязательно процедуру? А то в таких задачах на проверку истинности обычно используют функцию логического типа.

Добавлено через 19 минут 2 секунды
В принципе, если нужна только процедура, то можно так.

Pascal

uses crt;
const m=25;
      nmax=100;
type Tmas=array[1..nmax] of integer;
procedure Povtor(x:byte;m1,m2:Tmas; var f:boolean);
var i,j,k:byte;
begin
k:=0;
for i:=1 to m do
for j:=1 to x do
if m1[i]=m2[j] then k:=k+1;
if k=m then f:=true
else f:=false;
end;
 
var a,b:Tmas;
    pv:boolean;
    n:byte;
..................
write('n=');readln(n);
if n<m then 
   begin
    write('Ne vse vhodyat!');
    readln;
    exit;
   end
else
   begin
     ввод массивов
....................
     Povtor(n,a,b,pv);
     if pv=true then write('Vse vhodyat!')
     else write('Ne vse vhodyat!');
    end;
readln
end.

Вернуться к обсуждению:
Верно ли что все члены последовательности a1 .. a25 входят в последовательность b1...bn Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

28.02.2009, 15:27

Готовые ответы и решения:

Получить все члены последовательности b1 ... bn, которые не входят в последовательность a1 ... a25
Есть код задачи со вложенными циклами. надо сделать с процедурой. Помогите пожалуйста, у меня не...

Верно ли, что все члены последовательности b1,..., bn входят в последовательность a1,..., a25
Даны натуральное число n, целые числа a1,..., a25, b1,..., bn. Среди a1,..., a25 нет повторяющихся...

Получить все члены последовательности b1,b2,.,bn, которые не входят в последовательность a1,a2,.,a25
Даны натуральное число n, целые числа a1,a2,...,a25, b1,b2,...,bn. Среди a1,a2,..., a25 нет...

Получить все члены последовательности b1,..., bn, которые не входят в последовательность a1,..., a25
Даны натуральное число n, целые числа a1,..., a25, b1,..., bn. Среди a1,..., a25 нет повторяющихся...

	28.02.2009, 15:27

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

28.02.2009, 15:27

Помогаю со студенческими работами здесь

Верно ли что все члены последовательности a входят в последовательность b
Даны натуральное число n,целые числа a,...,a,b,...,b.Среди a,...,a нет повторяющихся чисел,нет их и...

Определить, верно ли, что все члены второй последовательности входят в первую последовательность
Даны две последовательности a1, a2, ..., an и b1, b2, ..., bm (m < n). В каждой из них члены...

Верно, ли что все члены второй последовательности входят в первую последовательность
Даны две последовательности a1, a2, …an и b1, b2, …bm. (n>m). В каждой из них члены различны....

Определить, верно ли, что все члены второй последовательности входят в первую последовательность
даны две последовательности a1, a2,...,an и b1, b2,...,bm (m<n). в каждой из них члены различны....

Даны две последовательности. Верно ли, что все члены второй последовательности входят в первую?
Даны две последовательности a^1,a^2,...,a^n, b^1,b^2,...,b^n (m<n). В каждой из них члены различны....

Определить верно ли, что все члены одной последовательности входят в другую
Даны натуральное число n , целые числа a1, ...,a15, b1,...,bn. Среди а1, ...a15, нет повторяющихся...

Наверх