metal244
Новичок
|
    
Помогите решить массив пожалуйста.
Условие задачи : Составить схему алгоритма и программу циклического вычислительного процесса. Индексацию элементов заданного массива начать с 2. Для перебора элементов массива использовать оператор For. Дан массив М, содержащий 15 элементов вещественного типа. Определить, сколько из них больше своих «соседей» по ряду.
|
Всего сообщений: 1 | Присоединился: ноябрь 2011 | Отправлено: 27 нояб. 2011 15:07 | IP
|
|
vlad23imir
Новичок
|
помогите пожалуйста решить задачу в паскале,до экзамена не допускают без нее,у меня не получается решить 
Массив.
Для заданной целочисленной матрицы Н найти минимум среди сумм модулей элементов диагоналей, параллельных побочной диагонали. Исходную матрицу вывести в общепринятом виде. Полученные суммы и результат вывести в произвольной форме
|
Всего сообщений: 2 | Присоединился: декабрь 2011 | Отправлено: 11 дек. 2011 10:57 | IP
|
|
next1142
Новичок
|
помогите плиз
Составить программу имитирующую работу процессора аккумуляторно-го типа при преобразовании целых двоичных чисел в восьмеричные (и обратно). Программа должна иметь диалоговый интерфейс.
|
Всего сообщений: 36 | Присоединился: декабрь 2009 | Отправлено: 14 дек. 2011 12:21 | IP
|
|
Banana
Новичок
|
Умненькие люди,уважаемые технари,помогите глупой девушке с гуманитарным недообразованием))застряла на процедурах)завтра сутра надо лабу сдать,а я сделать не могу))Будьте милыми))
Итак,изначально задача была на массивы,одномерные,Нужно было положительные элементы массива х записать в массив у, на экран вывести кол-во положительных элементов,сумму элементов массива х,сумму элементов массива у.Получилось так
program massive1;
const n1=15;
var x,y:array [1..n1] of real;
k,i,n:integer;
s,pr:real;
begin
pr:=1;
k:=1;
writeln('vvediten');
readln(n);
writeln('vveditex');
for i:=1 to n do
readln(x);
for i:-1 to n do
begin
if x>0 then
begin
y[k]:=x;
inc(k);
pr:=pr*x;
end;
s:=s+x;
end;
writeln('massive x');
for i:=1 to n do
writeln (x:5:1,' ':3);
writeln;
writeln ('massive y');
for i:=1 to k-1 do
writeln(y:5:1,' ':3);
writeln;
writeln('kol-vo polozitel'nih=",i);
writeln('summa elementov massiva X=',s:2:1);
writeln('summa elementov massiva Y=',pr:2:1);
end.
ну так вот эту же задачу надо решить при помощи трех процедур)))умоляю помогите,иначе мне грозит быть повешенной возле деканата))
|
Всего сообщений: 1 | Присоединился: декабрь 2011 | Отправлено: 15 дек. 2011 1:18 | IP
|
|
Evelina Kireeva
Новичок
|
Всем приветики, помогите решить задачу на паскале,(при решении использовать параметры,процидуры)
пусть даны натуральные числа i,j (1<=i, j<=24) и вещественная
матрица размером 18*24.
Поменяйте в матрице местами i-Й и j-й столбцы.
|
Всего сообщений: 2 | Присоединился: декабрь 2011 | Отправлено: 26 дек. 2011 17:53 | IP
|
|
lerka
Новичок
|
помогите решить
1. Составить программу, которая во введенном тексте удаляет все гласные буквы латинского алфавита, удваивает цифры и подсчитывает количество строчных букв латинского алфавита.
На печать выдать исходный текст, количество строчных букв латинского алфавита и преобразованный текст.
2. Дана строка длиной не более 255 символов. Группы символов, разделённых между собой одним пробелом и не содержащих пробелов внутри себя, назовём словами. Слова в строке отделены одним пробелом, в конце ставится точка Напечатать предложение, переворачивая в нём все слова с нечётными номерами.
|
Всего сообщений: 1 | Присоединился: январь 2012 | Отправлено: 7 янв. 2012 14:36 | IP
|
|
AlexanderGra
Новичок
|
Помогите пожалуйста составить программу
Очень Срочно!!
5.Для заданной целочисленной матрицы расположить элементы каждого столбца таким образом, чтобы четные предшествовали нечетным без изменения порядка следования элементов одной четности. Использовать модуль сортировки элементов одномерного целочисленного массива.
Заранее спасибо)
|
Всего сообщений: 1 | Присоединился: январь 2012 | Отправлено: 17 янв. 2012 22:08 | IP
|
|
luck
Новичок
|
есть 3 задачи
1)
составьте программу для вычисления суммы ряда S= -1+1/2+3/4+...+2n-1/2^n (n=0,1,2...) с точностью до члена ряда, не превышающего величине 0.001
|
Всего сообщений: 7 | Присоединился: январь 2012 | Отправлено: 2 фев. 2012 0:25 | IP
|
|
ELENA 20
Новичок
|
Помогите пожалуста решить и сделатьблок схему . Плиз ребята. заранее спасибо=*
Дан массив чисел Р=(р1,р2,....рn) вычислить среднее арифметическое отрицательных элементов массива
|
Всего сообщений: 6 | Присоединился: декабрь 2011 | Отправлено: 3 фев. 2012 0:13 | IP
|
|
Cartman
Новичок
|
Помогите пожалуйста очень нужно ..сегодня!
«Создание программы с разветвлением»
В киоске есть 3 вида проездных: ученический за 14,50 грн., Студенческий - с 16,50 грн., Взрослый - за 25 грн. В киоск подошел человек и дала киоскеры определенную сумму денег.
1) Составить программу, которая на введенную сумму определяет, какой проездной может приобрести человек.
2) Человек хочет приобрести несколько проезжих. Найти сумму, которую ей надо заплатить, если известен вид проездного и их количество.
3) Составить программу, которая на введенную сумму определяет, сколько и каких проездных может купить человек, если и указывает, какие и сколько должны быть обязательно.
|
Всего сообщений: 2 | Присоединился: февраль 2012 | Отправлено: 6 фев. 2012 18:20 | IP
|
|
|
Форум
Решение задач на Pascal. Форум 3.
