Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Помогите решить задачу на типизированные файлы Плиз решите задачку на фаил записей. Заранее спасибо В файле f записаны сведенья об ученике. Они состоят из фамилии, имени, года обучения, буквы класса. Распичатать однофамильцев в классе, название которого выводится или текс "однофомильцев нет" Добавлено через 4 минуты 30 секунд Извените сто зделал раздачу ещё раз. просто в той услове каряво написал https://www.cyberforum.ru/ pascal/ thread21082.html	Функция, которая умножает n-мерный вектор на число Pascal Здравствуйте, подскажите, как написать :scratch::wall: : 1.Функция, вычисляющая скалярное произведение 2 n-мерных векторов (за координатами). 2. Функция, что позволяет вводить координаты n-мерного вектора с клавиатуры 3. Функция, которая умножает n-мерный вектор на число. 4. Функция, что вычисляет длину n-мерного вектора. 5. Функция, что вычисляет угол между 2 n-мерными векторами. 6....
Pascal В заданном тексте найдите количество 4-буквенных слов и каждое четное из них замените на сочетание SsSs Помогите пожалуиста с задачами: 1.. Даны матрицы одинаковой размерности.Найдите сумму или разность этих матриц в зависимости от значения параметра Slag. 2.. На плоскости задана н точек периметр 12 . Найдите наименьший радиус круга с центром в начале координат в котором принадлежат все точки. 3..Дана матрица А порядка n. Найдите наибольний средний отрицательный элемент матрицы. 4..В заданном... https://www.cyberforum.ru/ pascal/ thread21078.html	Pascal Необходимо вычеркнуть буквы Вычеркните из слова X те буквы, которые встречаются в слове Z. PLEASE... https://www.cyberforum.ru/ pascal/ thread21074.html
Pascal Подсчёт букв... В тексте, состоящем из русских букв, подсчитайте количество гласных букв. Помогите пожалуйста..	Pascal Замена букв в слове... https://www.cyberforum.ru/ pascal/ thread21071.html Нужно заменить в заданном слове все буквы " о " пробелами. Помогите плиз с задачей...
Pascal В некотором тексте найдите глаголы в неопределенной форме. Здраствуйте! пожалуйста помогите с задачкой. Задача: В некотором тексте найдите глаголы в неопределенной форме. (например, Требование объявлять явно типы всех объектов приводит к избыточности в Фортран-программе, которая, однако, делает ее надежнее). Заранее благодарна за помощь. https://www.cyberforum.ru/ pascal/ thread21070.html	Найти наибольший элемент массива и сообщить его расположение относительно левой диагонали Pascal Мне по практики задали задание, но у меня после сесии голова не работает:wall: Если кому не трудно решите , очень прошу, зарание спасибо!!! 1.Задачи на двумерные массивы Дан целочисленный массив В. Найти наибольший элемент массива и сообщить его расположение относительно левой диагонали. 2.Задачи с использованием подпрограмм (процедуры и функции) Даны натуральные m и n (m<n). Составить...
Pascal Необходимо вычислить длину самого короткого слова... Необходимо вычислить длину самого короткого слова в предложении из трех слов слов, разделённых пробелами. Помогоите пожалуйста... https://www.cyberforum.ru/ pascal/ thread21068.html	Pascal помагите с задачей по файлам Ребят помагите с задачей. Заранее большое спасибо в файле f записаны сведенья об ученике. Они состоят из: Фамилии, имени, года обучения, буквы класса. Распичатать однофомильцев в классе, название которого выводится или текс "Однофамильцев нет" https://www.cyberforum.ru/ pascal/ thread21058.html
Программа, определяющая число слов... Pascal Необходимо написать программу, определяющую число слов в строке. Одно слово от другого отделяется 1 пробелом. плиз помогите...	Pascal вычислить произведение с точностю e = 0,0001 Ребят плиз помогите решить задачу на рекурсию. вычислить произведение с точностю e = 0,0001 и распичатать p, где p 1/(1+i^i), и меняется от одного до n. Точность будет достигнута когда 1/(1+n^2) <= e https://www.cyberforum.ru/ pascal/ thread21044.html

AlexQ

35 / 35 / 6

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

Сообщений: 141

17.01.2009, 14:04

Определить обем цилиндрового бака, когда известная высота бака и радиус основы бака. - Pascal - Ответ 93772

17.01.2009, 14:04. Показов 2351. Ответов 10

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

Ответ

Первая:

Pascal

program a1;
uses crt;
const
 pi=3.1415;
var
 r,h,v: real;
begin
 clrscr;
 write('Vvedite radius R i visotu H: ');
 readln(r,h);
 v:=pi*sqr(r)*h;
 writeln('V=',v:6:2);
 readkey;
end.

Вторая:

Pascal

program a1;
uses crt;
var
 x,y: real;
 n: integer;
begin
 clrscr;
 write('Vvedite N i X: ');
 readln(n,x);
 y:=n/x;
 writeln('Y=',y:7:3);
 readkey;
end.

Добавлено через 23 минуты 39 секунд
Третяя:

Pascal

program a1;
uses crt;
var
 x,y,z: integer;
 v: real;
function vv(x2,y2,z2:integer):real;
 begin
  vv:=exp(ln(x2)*exp(ln(y2)*z2));
 end;
begin
 clrscr;
 write('Vvedite X,Y,Z: ');
 readln(x,y,z);
 v:=vv(x,y,z);
 writeln('V=',v:8:2);
 readkey;
end.

Блок-схемы также довольно простые. Нужна помощь?

Вернуться к обсуждению:
Определить обем цилиндрового бака, когда известная высота бака и радиус основы бака. Pascal

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

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

Programming

Эксперт

94731 / 64177 / 26122

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

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

17.01.2009, 14:04

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

СМА Samsung WF-F861/YLP, s/n: X4765ADPC00367F, крестовина бака, Какая там крестовина бака
Подскажите на СМА Samsung WF-F861/YLP 4,5кг , s/n: X4765ADPC00367F, какая там стоит ...

Определить размеры бака (R, h), имеющего форму цилиндра с крышкой
Постановка задачи: Используя надстройку Microsoft Excel Поиск решения, определить размеры бака (R,...

Определить силу, действующую на болты крышки бака, заполненного жидкостью.
Определить силу, действующую на болты крышки бака, заполненного жидкостью плотностью ρ. Угол...

Определить, сколько потребуется банок с краской, если известны размеры бака и площадь
линейный вычислительный процесс: 5) Маляру поручили покрасить крышу и стенки бака для бензина в...

	17.01.2009, 14:04

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

17.01.2009, 14:04

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

Открытие и закрытие крышки бака
Доброго времени суток Я работаю в транспортной компании. У нас на авто стоят GPS-трекеры, у...

Трещина бака Electrolux EW1259W
Доброго времени суток, уважаемые форумчане! Прошу совета. Стиральная машинка Electrolux EW1259W, в...

Проржавела Крышка бака Indesit wg835tx
Собственно проржавела крышка бака в месте установки датчика. Датчик вместе с уплотнителем на...

Подобрать с точностью до 5 мм оптимальные размеры бака
Топливный бак объемом V м^3 имеет форму цилиндра с коническим обтекателем. Угол при вершине конуса...

Наверх