Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Найти количество положительных нечетных элементов массива Найти количество положительных нечетных элементов массива https://www.cyberforum.ru/ pascalabc/ thread2009006.html Прямоугольник Pascal ABC
Здравствуйте. Возникло желание (нет) сделать программу где у нас даны ширина и длинна прямоугольника. Ну это просто вычислить. Вопрос возникает в том как построить прямоугольник по этим сторонам которые мы ввели.Везде варианты через x,x1. Кто может сталкивался с подобной ситуацией?
Pascal ABC Вычислить сумму игр Добрый день. Прошу помочь в написание программы на языке Pascal, Исходные данные: Дан ориентированный граф. Стандартная игра на графе заключается в следующем: изначально на одной из вершин графа (называемой начальной позицией) стоит фишка. Двое игроков по очереди двигают её по рёбрам. Проигрывает тот, кто не может сделать ход. В теории игр часто рассматриваются более сложные игры.... https://www.cyberforum.ru/ pascalabc/ thread2008666.html Pascal ABC Вычислить произведение отрицательных элементов, стоящих на чётных местах нечётных столбцов матрицы https://www.cyberforum.ru/ pascalabc/ thread2008655.html
Вычислить произведение отрицательных элементов, стоящих на четных местах нечетных столб та двумерного массива N(3,4).
В строке найти количество слов - перевертыш, содержащих не менее 2 символов Pascal ABC
В строке найти количество слов - перевертыш, содержащих не менее 2 символов.
Pascal ABC Вычислить значение выражения Оператор CASE Задача. Решить систему Y= х+1, если а € ; x^2, если а=19; х-10, если а < 0; √x, если а €; 0 во всех остальных случаях https://www.cyberforum.ru/ pascalabc/ thread2008598.html
Pascal ABC Создание списков Всем доброго времени суток!!! Помогите с кодом, пожалуйста!!!! Даны натуральное число n, действительные числа x1, ..., xn (n ≥ 2). Получить последовательность x1 - xn, x2 - xn..., xn-1 - xn. https://www.cyberforum.ru/ pascalabc/ thread2008522.html Pascal ABC Найти значение уравнения по схеме Горнера
Помогите найти значение уравнения по методу Горнера и записать в PascalABC.Очень нужно ,пожалуйста. p=3*x6-5*x3+x-4
Pascal ABC В заданном интервале найти все числа, которые делятся на каждую из своих чётных цифр Составить программу, обеспечивающую в интервале от N1 до N2 (N1, N2 – натуральные числа) поиск и вывод на экран всех чисел, которые делятся на каждую из своих четных цифр. На экран должны выводиться такие числа и количество четных цифр в них Я пыталась, но в итоге сама себя запутала const n=20; var A:array of integer; N1, N2:integer; i, kol:integer; https://www.cyberforum.ru/ pascalabc/ thread2007820.html Pascal ABC Вывести путешественников, попавших в лабиринт, к выходу Вывести путешественников, попавших в лабиринт, к выходу. Лабиринт представляет собой совокупность коридоров и перекрестков. Местом начала пути может быть любой из имеющихся перекрестков. Скажите, пожалуйста, чего здесь не хватает и есть ли проблемы какие-то? Если есть, то по возможности дополните и напишите полный, пожалуйста. For I := 1 to 100 do zah_reb := 0; last_ver := N_vhod; m :=... https://www.cyberforum.ru/ pascalabc/ thread2007750.html
Получить список всех выданных книг и подсчитать их количество Pascal ABC
О каждой книге в читальном зале имеются следующие сведения: Ф.И.О автора, название, инвертарный номер, год издания, количество запросов книги, сведения о наличии (на руках или нет) (Файл 1) Получить: 1. Файл 2 заявок на книги: Ф.И.О. заказчика, автор, название, особая метка. Если все заказанные книги на руках, то в заявке о выдаче и соответствующим образом откорректировать файл 1. 2....
Pascal ABC Задача на массивы Вариант19 Дан массив Y = }, i=1,10; j=1,10 ] (элементы выбираются случайным образом): 1. Найти произведение элементов, которые удовлетворяют условию -5 < y ( i , j)<15. 2. Вычислить произведение элементов, стоящих на местах, с нечетной суммой индексов. 3. Переставить местами элементы с четными номерами и элементы с не четными номерами главной диагонали. 4. Посчитать количество элементов... https://www.cyberforum.ru/ pascalabc/ thread2007478.html
0 / 0 / 0
Регистрация: 20.04.2017
Сообщений: 11
0

Вычисление факториала и вычисление степени числа - Pascal ABC - Ответ 10574047

24.06.2017, 16:46. Показов 2045. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Нужно проверить правильность сделанной программы если не правильно помогите исправить.
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
35
36
37
38
Var a,a1,a2,a3,x,c,st,otvet:real;
               n,k,y,fac:integer;
 
procedure stepen(sl1:real; nn:integer; var st:real);
  begin
  st:=Power(sl1,nn);
  end;
procedure factorial(f:integer; var fac:integer);
var i,fn:integer;
  begin
  fn:=1;
  For i:=1 to f do fn:=fn*i;
  fac:=fn;
  end;
 
BEGIN
//1 часть
Write('c=');Read(c);
Write('x=');Read(x);
Write('k=');Read(k);
stepen(c-y,k,st);
a1:=st;
//Writeln('a1=',a1);
//2 часть
Write('c=');Read(c);
Write('k=');Read(k);
factorial(c,fac);
a2:=fac;
//Writeln('a2=',a2);
//3 часть
Write('c=');Read(c);
Write('m=');Read(m);
stepen(c,k,st);
a3:=st;
Writeln('a3=',a3);
otvet:=a1/(a2*a3);
Writeln('Ответ равен: ',otvet);
END.
https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
F=\frac{(c-x)^k}{c^k(c!-k!)}<br />

Вернуться к обсуждению:
Вычисление факториала и вычисление степени числа Pascal ABC
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.06.2017, 16:46
Готовые ответы и решения:

Вычисление факториала числа с использованием рекурсии
Очень срочно нужно, помогите если кто знает. Задача 11 Вычисление факториала числа с...

Вычисление факториала целого положительного числа
Составить реккурсивную подпрограмму функцию для вычисления факториала целого положительного числа....

Вычисление числа 4 в степени 500
Народ, нужно дорешать пару задач на паскале! 1. Составить программу вычисления числа 4 в степени...

Рекурсивное вычисление корня третьей степени из числа
Что в данном случае означают параметры функции k и n? program qroot; function f(x:real;...

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

Вычисление двойного факториала
Помогите пожалуйста,исправить ошибку. Вычисление двойного факториала (2n+1)!! (например...

Вычисление факториала в графике
Реализовать с графическим интерфейсом вычисление факториала ( рекурсивно и генерационно ) ...

Вычисление факториала с помощью рекурсии
Составление и отладка программы с внешними модулями. Написать внешний модуль для вычисления с...

Вычисление факториала с использованием функции
function fact(n:byte):integer; var k : longint; j : byte; begin k:= 1; for j:= 2 to n do...

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