Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Изображение Паскаль https://www.cyberforum.ru/ pascal/ thread2317759.html Добрый вечер, сделал изображение в паскале. Но при компиляции открывается в одном окне, а можно ли сделать так, чтобы другое изображение уже в другом окне? Именно Graph.abc? А то он просто обновляет. Или может как-нибудь через байтник.	Pascal Подпрограмма: меньшее из двух чисел заменить их полусуммой, а большее - их удвоенным произведением Оформите через процедуру или функцию действительные числа x, y. Меньшее из этих двух чисел заменить их полусуммой, а большее – их удвоенным произведением
Pascal Защита программы. Pascal https://www.cyberforum.ru/ pascal/ thread2317459.html Добрый день, написал простенькую программу себе для универа. Можно ли поставить на нее хоть какую-нибудь простецкую защиту от копирования? Думал про генерацию ключа, но без понятия, как это осуществить.	Pascal Определить есть ли в числе цифра 2 https://www.cyberforum.ru/ pascal/ thread2317393.html Программа должна определять имеется ли в числе цифра 2, если ввожу ответ с двойкой то всё нормально, а когда просто другое число в котором не имеется цифры 2, выдает ошибку(Попытка деления на нуль). Стоит ли переписывать код или просто допущена тупая ошибка ? uses crt; var a,b,c,d,e:integer; begin b:=10; e:=1; readln(a); while d<>2 do begin c:=a mod b; d:=c div e; if d<>2...
Камень, ножницы, бумага Pascal Новичок ,дня 2 сижу на паскале .Баг в коде.Баг в том ,что после 1 игры если написать ,что то кроме "бумаги" ,"ножницы" и program knbumaga; uses crt; var b,c:integer; a:string; f:char;	Pascal Построить множество Построить множество, состоящее из дружественных чисел в интервале от 1 до 255 https://www.cyberforum.ru/ pascal/ thread2315798.html
Pascal Подсчет количества "счастливых" билетов в ленте между заданными номерами https://www.cyberforum.ru/ pascal/ thread2315775.html Имеется лента билетов с шестизначными номерами. Первый билет имеет номер M, последний – N. Величины M и N отвечают следующему соотношению: 100000 ≤ M < N ≤ 999999. Необходимо определить количество «счастливых» билетов в ленте. Билет считается «счастливым», если сумма первых трех цифр равна сумме последних трех цифр. Ввод Ввод содержит построчно номера первого и последнего билетов в ленте....	Pascal Нарисовать Остров, составленный из 4-х кривых Составить алгоритм Остров (алг вещ длина,алг цел глубина) рисующий остров, составленный из 4 кривых
Pascal Переворот и падение дудла Добрый день. После того, как дудл упёрся верхней частью головы о нижнюю часть платформы, его изображение должно измениться на отраженное по вертикали ( doodler1 в папке data), и направление его движения - на противоположное ( будто он падает вниз, а не летит вверх.) Платформа - 57 x 15 px, Doodler - 57 x 57 px, голова в пределах y: 0 . x нач.: 16 х конечн. : 21 Почему-то никак не... https://www.cyberforum.ru/ pascal/ thread2284062.html	Pascal Не могу осуществить редактирование записи https://www.cyberforum.ru/ pascal/ thread2283813.html Первый пост на форуме,поэтому могу ошибаться как правильно постить. неведомая куча символов скорее из-за того что использую Turbo Pascal(но в нем же нет копирования текста программы?), а вставил при помощи АВС pascal Может ли кто помочь реализовать процедуру редактирования? Процедура Redact, сейчас, если что, там просто набор бреда Program Laba; Uses Crt; Type
Pascal Вывести значения максимального элемента program z1; uses crt; const n=10; m=20; var a:array of integer; i,j:integer; max:integer; str,stl:integer; begin	Pascal Подсчитать количество положительных элементов в матрице Всем привет! Помогите решить задачу Разработать алгоритм и написать программу (СИ или Паскаль), которая подсчитает количество положительных элементов в матрице X (10,20). Значения элементов матрицы заданы. Вывести это количество. https://www.cyberforum.ru/ pascal/ thread2281596.html

kukuept

0 / 0 / 0

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

Сообщений: 1

Написать программу для вычисления значений выражения... - Pascal - Ответ 12879386

04.09.2018, 21:43. Показов 6293. Ответов 1

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

Author24 — интернет-сервис помощи студентам

Здравствуйте. Решаю задания и хотел бы спросить правильно ли я понял условия задачи, потому что я что-то не уверен (в частности на счет Δx, интервал.

Задание звучит так:
Написать программу для вычисления значений выражения...где n - четные числа, на интервале (0;20) с шагом Δx = 5.

$https://www.cyberforum.ru/cgi-bin/latex.cgi?A = \sum_{0}^{m} 4n+2$

Pascal

program i1_9;
var sum, i, m : integer;
 
begin
      m := 20;
      sum := 0;
      
       for i := 0 to m do
           begin
 
                if (i mod 2 = 0) and (i mod 5 = 0) then
                begin
                    write ('sum = 4*', i, '+2 = ');
                    sum := (4 * i + 2);
                    writeln (sum);
 
                end;
 
           end;
       writeln;
end.

Добавлено через 12 минут
С ответом вроде так должно быть:

Pascal

program i1_9;
var sum, sum1, i, m : integer;
 
begin
      m := 20;
      sum := 0;
      sum1 := 0;
       for i := 0 to m do
           begin
 
                if (i mod 2 = 0) and (i mod 5 = 0) then
                begin
                    write ('sum = 4*', i, '+2 = ');
                    sum := (4 * i + 2);
                    sum1 := sum + sum1;
                    writeln (sum);
 
                end;
 
           end;
       writeln ('Ответ: ', sum1);
end.

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

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

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

Programming

Эксперт

94731 / 64177 / 26122

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

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

04.09.2018, 21:43

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

Нужно написать программу для вычисления выражения
Нужна написать программы для решения в Pascal \left|sinx/3,12+cos x^2 \right|-8,3 sin3x

Написать программу для вычисления значения выражения
мне осталось совсем немного,всего 3 задачи,но я никак не могу их решить,может быть вы сможете мне...

Написать программу для вычисления значения выражения вводимого с клавиатуры
Программа для вычисления значения выражения вводимого с клавиатуры.

Написать схему алгоритма и программу вычисления выражения
Напишите программу, согласно заданию. Основной функционал программы должен быть офромлен в виде...

	04.09.2018, 21:43

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

04.09.2018, 21:43

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

Написать программу вычисления значения заданного арифметического выражения
Помогите пожалуйста написать программу вычисления значения заданного арифметического выражения.

Разработать программу вычисления значений заданных функций для произвольных значений исходных данных
Разработать программу вычисления значений заданных функций для произвольных значений исходных...

Написать программу вычисления выражения, используя способы программирования с созданием функции
Написать программу вычисления выражения, используя способы программирования с созданием функции...

Построить блок-схему и написать программу (Паскаль) вычисления значения выражения
Прикрепил ниже.

Наверх