№1.Вычислить длину окружности, площадь круга и объём шара одного и того же заданного радиуса.
№2.Подсчитать число и сумму положительных, число и произведение отрицательных элементов заданного массива A(N).
№1.Вычислить длину окружности, площадь круга и объём шара одного и того же заданного радиуса.
№2.Подсчитать число и сумму положительных, число и произведение отрицательных элементов заданного массива A(N).
найти лучший результат в забеге на 100 м трёх спортсменов
Добавлено через 4 минуты
найти лучший результат в забеге на 100 м трёх спортсменов
Добавлено через 14 минут
найти лучший результат в забеге на 100 м трёх спортсменов
Последний раз редактировалось надежда2; 12.02.2010 в 03:12. Причина: Добавлено сообщение
напишите программу котрая вводит с клавиатуры 10 реальных чисел и организовывает их хранение в массиве.После этого массив пересортировывается по закону первый сэлемент меняем с последним ,второй с предпоследним и т.д мужики пожалуйста помогите,а то я завтра попал
наверно такКод:var i:integer; p:real; a:array [1..10] of real; begin writeln('vvedite massiv'); for i:=1 to 10 do readln(a[i]); for i:=1 to 5 do begin p:=a[i]; a[i]:=a[11-i]; a[11-i]:=p; end; for i:=1 to 10 do write(a[i]:2:0); readln; end.
огромное спасибо кстати,помогите еще решить,Дан массив А состоящий из 20 целых чисел первое на возрастание,второе на убывание
Добавлено через 3 минуты
и вот еще одна,Напишите программу которая организует решение в массиве 15 различных введенных с клавиатуры целых чисел.После этого содержимое массива сортируется по возрастанию
Добавлено через 15 минут
вот еще одна,Напишите программу которая организует решение в массиве 15 различных введенных с клавиатуры целых чисел.После этого содержимое массива сортируется по возрастанию
Последний раз редактировалось максимилианус; 11.03.2010 в 22:29. Причина: Добавлено сообщение
Помогите решить програму. Дано текст. Ясли певим символом тексту эсть цифра,то все цифры, што входять в текст, заменить символом *
ПОМОГИТЕ ПОЖАЛУЙСТА!!! СРОЧНО НАДО! СПАСИБО ЗАРАНЕЕ.
Задан одномерный массив C(N) (N<=60). Вычислить сумму положительных элементов, этой суммой заменить максимальный элемент и последний элемент массива. Массив С напечатать.
ой............не туда зашла-ушла
"– Это водка? – слабо спросила Маргарита. Кот подпрыгнул на стуле от обиды. – Помилуйте, королева, – прохрипел он, – разве я позволил бы себе налить даме водки? Это чистый спирт!" (с)
Помогите решить пару задачек на Паскале. Нужно ответить на эти вопросы программулину составлять не надо. Помогите
1) Приведите 5 задач, которые можно решать с помощью банков данных. Почему эти задачи лучше решать с их помощью?
2) Даты вводятся в соответствии с шаблоном: две цифры, название месяца (янв, фев, мар, апр, май, июн, июл, авг, сен, окт, ноя, дек), две цифры года двадцатого века. Запишите выражение, истинное, если первая из двух введенных дат больше второй. Опишите процедуры и функции, которые будете использовать при решении задачи.
1)преобразовать массив Y в массив V по формуле Vj=sin Yj(j=1,9)
2)определить номер первого положительного элемента массива V и произведение следующих за ним элементов.Оформить подпрограмму выполнения над массивом A(a1,a2,...an)указанных действий.
3)Преобразоватьодномерный массив v в двумерный w размером 3на3 разрезав массив условно на три поломки и поместив затем под первой полоской вторую и под второй третью.использовать при этом оформленную подпрограмму преобразования одномерного массива А размером 9 в бинарный 3на3.
4)заменить столбец с наименьшим элементом нулями.Оформить подпрограмму выполнения над массивом В размером m * n указанных действий
помогите решить кто сможет!!!!!!!!!!!!!!!!!!срочно!!!!!!!!!!!!!!!!!!!! !!!!
Помогите решить задачи в Паскале!
1. Дано чотири числа b,c,d,e.Перозначити ці числа так,щоб b=max(b,c,d,e),c-min(b,c,d,e) з чисел що залишилися,щоб b було б менше за e.
2. Відомо координати двох точок A(x1,x2) і B(x2,y2)?а також координати центра O(x,y) кола радіуса R.Якщо точки лежать всередині кола,то знайти периметр трикутника ABO,інакше знайти периметр трикутника,який утворений заданими точкамиі початком координат.
3. За введеним номером пари (від 1 до 3) визначити назву пари у власній групі в понеділок.
Berkut_mk (11.03.2013)
Напишите программу, которая в заданной матрице заменяет все положительные элементы нулями, если количество отрицательных элементов окажется больше, чем количество положительных элементов.
Как то так. Смотри Оффтоп.
Оффтопик
Всем привет помогите с задачкой в паскале всем кто откликниться буду благодарен!
Вычислить значение выражения с учетом
области допустимых значений.
Комментарии
к заданию
При решении задачи рекомендуется использовать метод
разделения выражения на части.
Программа имеет
вид:
Program reshenie;
var a,x,y,b,c:real;
begin
writeln('
Введите значение х' );
readln( x);
a:=sin(x);
b:=x-2;
c:=cos(x);
if b<>0 then
if c>0 then
writeln (a/b-ln(c))
else writeln('Подлогарифмическое
выражение <= 0 ')
else writeln ('Знаменатель = 0 ');
end.
Нужно изменить эту программку для решения этого безобразия
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)