Форум программистов и сисадминов КиберфорумКиберФорум - форум программистов и системных администраторов. Бесплатная помощь в решении задач по программированию, математике, физике и другим наукам, решение проблем с компьютером, операционными системами. |
|
Перевод десятичного числа в троичное
Задача.
Разработайте программу перевода десятичного натурального числа n в троичную систему счисления.
Узнал о процедуре str. Как-то не ко времени. Слишком тяжелый бубен для уровня школьного...
Периметр треугольника с функцией
В учебнике приведен пример
Запишем на языке Pascal программу нахождения периметра треугольника, заданного координатами его вершин. Вспомогательный алгоритм оформим в виде функции.
program...
Проверка соответствия всех элементов массива некоторому условию. Задача
Задача.
Для того, чтобы установить факт соответствия всех элемента массива некоторому условию, достаточно:
1) подсчитать количество элементов массива, соответствующих заданному условию;
2)...
Вывод общего слова в текстовом файле
Как код написать для этой задачи?
Дан файл, содержащий текст на русском языке. Найти слово, встречающееся в каждом предложении, или сообщить, что такого слова нет.
Подсчет количества элементов, удовлетворяющих некоторому условию. Задача
Задача.
Фрагмент программы подсчета количества элементов массива, например больших некоторого числа р, имеет вид:
k:=0;
for i:=1 to n do
if a>p then k:=k+1;
Запишите полный текст...
Комплексная задача на написание программы
Задача.
Дано натуральное десятичное число n <= 32000. Напишите программу, в которой:
из цифр данного числа формируется одномерный целочисленный массив;
определяются наибольшая и наименьшая...
Модифицировать прогамму чтобы в начале ее работы пользователю задавался вопрос о количестве символов
В учебнике рассматривался пример решения задачи.
Сам пример я изложил в теме https://www.cyberforum.ru/turbo-pascal/thread3143315.html
Его код:
program slova;
var simbol: array of char;
i,...
Задача. Что получится в результате работы программы
Дана программа:
program rek;
procedure F(n: integer);
begin
if n>0 then
begin
F(n-4);
writeln(n);
F(n div 3)
Написать программу вычисления по формуле
Задача.
Напишите программу вычисления
C_{n}^{k}=\frac{n!}{(n-k)!\cdot k!}
Используйте подпрограмму.
Решил так:
Составить блок схему алгоритма и программу для вычисления радиуса вписанной окружности
Добрый день. Задали составите блок схему алгоритма и программу для вычисления радиуса вписанной окружности по формуле, вычисления производить с двойной точностью. Помогите пожалуйста, буду очень...
Задача. Программа вычисления значения F(n)
Алгоритм вычисления значения функции F(n), где n - натуральное число, задан следующими соотношениями:
F(n)=1 при n<=2;
F(n)=F(n-1)+3*F(n-2) при n>2.
Напишите программу вычисления значения...
Задача. Какой вспомогательный алгоритм целесообразно использовать?
Задача.
Дан прямоугольный параллелепипед, длины ребер которого равны a, b и c. Требуется определить периметр треугольника, образованного диагоналями его граней. Какой алгоритм целесообразно...
Периметр треугольника. Пример решения с заданием
В учебнике приведен такой пример решения.
Запишем на языке Pascal программу нахождения периметра треугольника, заданного координатами его вершин. Вспомогательный алгоритм оформим с помощью...
Входит ли заданная цифра в некоторое число
Задача.
Напишите программу, позволяющую определить, входит ли заданная цифра в некоторое целое неотрицательное число.
Мое решение:
var i, n: integer;
begin
writeln('Введите i');
read(i);...
Последовательный поиск в неупорядоченном массиве. Задача
В учебнике дан пример решения задачи.
Имеется массив a; требуется найти элемент массива, равный p.
Возможная программа имеет вид:
const n=10;
var a: array of integer; i, p: integer;
begin...
Найти максимальный элемент массива
В учебнике приведен пример решения задачи.
Имеется массив a; требуется найти значение наибольшего элемента массива.
Возможная программа имеет вид:
const n=10;
var a: array of integer;
i,...
Проверка массива на упорядоченность. Задача
Задача.
Рассмотрим алгоритм, позволяющий определить, упорядочены ли элементы массива a по неубыванию, т.е. каждый элемент массива с 1-го по (n-1)-й не больше последующего.
Ниже представлен фрагмент...
Обнаружить ошибку в программе. Задача
Задача.
Программист написал программу суммирования элементов массива, но допустил в ней ошибку.
Program summa;
const n=10;
var a: array of integer; s, i: integer;
begin
s:=0;
for i:=1 to...
Сортировка методом пузырька
Задача.
Есть массив: 5 4 3 2 1.
Попытайтесь самостоятельно запрограммировать алгоритм сортировки по неубыванию методом "пузырька".
Мое решение:
const
n=5;
a: array of integer = (5, 4,...
Какую задачу решает эта программа?
Задача.
Дана программа:
const n=5;
const a: array of integer=(1, 2, 6, 4, 6);
var i, max1, max2: integer;
begin
max1:=a;
max2:=a;
for i:=2 to n do
Протабулировать функцию
Друзья, помогите, пожалуйста.
Нужно составить блок-схему алгоритма.
Протабулировать функцию
f(x)=\frac{x-5}{x+1}+2e^{cos2x}
Перестановка всех элементов массива в обратном порядке
Задача.
Имеется массив:
Перестановка всех элементов массива a в обратном порядке сводится к тому, что меняются местами первый и последний элементы, второй и предпоследний элементы и т.д.
В...
Определить, принадлежит ли точка заданной области
Задача.
Разработайте программу, которая выводит сообщение "Да", если точка с координатами (x, y) принадлежит закрашенной области, и "Нет" в противном случае.
Мои решения. Границы областей я...
Найти сумму всех n-значных чисел, кратных k (1<=n<=4)
Найти сумму всех n-значных чисел, кратных k (1<=n<=4)
Составить блок схему
Составить блок схему алгоритма и программу для вычисления функции по формуле для произвольных исходных данных, с двойной точностью
Реализовать алгоритм по блок-схеме
Задача.
На блок-схеме представлен алгоритм одновременного поиска максимального и минимального значений элементов массива:
Реализуйте этот алгоритм на языке программирования для массива:
...
Вставка элемента в массив. Задача
Задача.
Дан массив:
Задача будет состоять в том, чтобы вставить в массив на место с индексом k=4 (т.е. после элемента с индексом k-1) еще один элемент, имеющий значение 11.
При вставке в...
Обработать сгенерированную или введённую информацию о заболеваемости гриппом
За 10 лет заболеваемость гриппом по 8 областям РФ принимала значения от 100 до 1000 случаев на 10000 населения.
Найти максимальное и среднее значения заболеваемости за 10 лет. Вывести значения...
Задание. Модель комнаты
Задание.
Создайте информационную модель одной из комнат вашей квартиры с целью оклейки ее обоями.
Мое решение.
Поскольку требуется одну из комнат - не стал заморачиваться универсальностью, а...
Сортировка выбором
Учебник содержит текст, после которого следует задача.
Сортировка выбором (в порядке неубывания) осуществляется следующим образом:
в массиве выбирается минимальный элемент;
минимальный и...
Ошибка в коде при построении гистограммы процесса
Задание: построить гистограмму процесса на выходе амплитудного детектора при воздействии на входе Гауссовского случайного процесса спектральной плотности.
program amplitude_detector;
uses Graph,...
Умер Никлаус Вирт, создатель языка Pascal - cnews.ru
Скончался Никлаус Вирт, создатель многочисленных языков программирования, включая язык Pascal.
Умер Никлаус Вирт
Умер Никлаус Вирт (Niklaus Wirth), великий теоретик программирования, пионер...
Вычислить радиус вписанной окружности
Вариант № 9
Составить блок схему алгоритма и программу для вычисления радиуса вписанной окружности по формуле, вычисления производить с двойной точностью.
Функции Ord и Chr
Не могу разобраться как их практически использовать.
Я разобрался поэкспериментировав с v:=ord('символ') - в переменной v получим код этого символа.
Так же с tri:=chr(код символа) - в переменной...
Вычислить с заданной точностью сумму ряда Тейлора для sh(x)
Прошу помочь с решением задачи:
Составить блок схему алгоритма и вычислить для заданного значения x сумму вида
y=\sum_{n=0}^{\infty...
Как импортировать в программу функцию из модуля через промежуточный?
Вспомогательная библиотека:
unit helper;
interface;
function foo: word;
implementation;
function foo: word;
begin foo:=0 end;
end.
Графика "звездное небо"
Нужно создать звездное небо из объектов с древовидной иерархией: Pozition (головной объект) -> star (от стара отходят две ветки, одна из них с солнцем, планетами и спутниками, но тут все ок, а вот со...
Описать рекурсивную логическую функцию Simm (S, i, j)
Описать рекурсивную логическую функцию Simm (S, i, j),проверяющую, является ли симметричной часть строки S, начинающаяя i-м и заканчивающаяся j-м её элементами
Избыточный код в задаче
В учебнике представлен пример решения задачи.
Задача.
Имеется массив символов.Требуется вывести на экран элементы данного массива в обратном порядке.
Будем рассматривать слова и фразы не более...
Разница между вставкой и заменой элемента массива
В учебнике задача - не задача. Вопрос.
Имеется ли разница между операциями вставки в массив элемента на место с индексом k и замены значения элемента массива с индексом k? Обоснуйте свой ответ.
...
Определить, принадлежит ли точка заданной области
Задание: Определить, принадлежит ли точка с координатами (x,y) заштрихованной части плоскости (с контролем ввода по переменной b). Использовать нужно Turbo Pascal
Плоскость
Если...
Дано действительное число "х".Вычислить при S=(x-2)*(x-4)*(x-6)*.*(x-64)/(x-1)*(x-3)*(x-5)*.*(x-63)
Подскажите что не так в программе.
program 15;
var
x, S: real;
i: integer;
begin
writeln('Введите значение x:');
readln(x);
S := 1.0;
for i := 2 to 64 do
Удаление из массива элемента
Имеется одномерный целочисленный массив из семи элементов:
Удалим из массива элемент с индексом k=4, а все элементы, расположенные справа от него, сдвинем на одну позицию влево.
При удалении...
Подсчитать количество слов и количество символов 's' в предложении, вывести каждое слово с новой строки
Нужна помощь в написании программы по подсчету и выводу слов...
Задача: Считать текст из файла. Слова разделены одним или несколькими пробелами. Вывести текст на экран. Подсчитать общее количество...
Усовершенствовать программу определения простоты числа
Задача.
Программа, проверяющая является ли число простым:
var
n, i: longint;
flag: boolean;
begin
writeln ('Введите n');
read (n);
flag:=true;
Обработать результаты стрельбы
Стреляя по мишени из винтовки, можно за один выстрел получить от 5 до 10 очков, остальные результаты считать промахами. Определить сколько выстрелов произвел спортсмен на момент, когда он имел L...
Каким будет результат преобразования массива?
Задача.
Имеется одномерный целочисленный массив из семи элементов:
Каким будет результат преобразования массива по следующему алгоритму:
for i:=k+1 to n do
a:=a;
Не компилирует программу
Не могу скампелировать программу windows 11
Добавлено через 51 секунду
Через консоль пробовал
Написать все возможные варианты кода. Задача
Задача.
Шифр кодового замка является двузначным числом. Буратино забыл код, но помнит, что сумма цифр этого числа, сложенная с их произведением, равна самому числу. Напишите все возможные варианты...
Еще одна задача на обнаружение ошибки
Задача.
Программист написал программу нахождения произведения элементов массива, но допустил в ней ошибку.
Program proizv;
const n=10;
var a: array of integer; p, i: integer;
begin
p:=0;...
Вычислить суммы членов последовательности
Составить программу вычисления суммы членов последовательности a1=k/k^2+1
( k= 1,2,3… n)
Составить на языке Pascal
Заранее спасибо
Найти значение выражения
Найти значение выражения
y=\frac{2*x_1!+3*x_2!}{x_3!+x_4! }
определив функцию расчёта факториала натурального числа
Суммирование трех одномерных массивов с помощью цикла repeat
Суммирование трех одномерных массивов с помощью цикла repeat, передалать вот эту программу из цикла for в repeat
Туре
Var
massiv=array of integeri
a , b, c: massiv; i : integer;
randomize;...
Получить множество простых чисел из заданного диапазона
Задано множество целых чисел от 1 до 100. Составить алгоритм и программу на языке Turbo Pascal для получения множества простых чисел из этого диапазона.
Mножество натуральных чисел, которые...
Найти произведения четных и нечетных элементов массива
Найти произведения четных и нечетных элементов массива X(n,m).
Надо именно элементов, номеров чисел, а не значений этих чисел
Вычислить значение выражения
Ребят, помогите с этой работой. Извините, что не написал текстом, а отправил только фото. Спасибо!
Создать программу для обработки файла с информацией о билетах
Разработать элементарное меню, состоящее из пронумерованных пунктов. Выбор пункта меню осуществляется вводом соответствующего номера пункта.
Меню имеет вид:
1 Создание текстового файла
2...
Разные цифры
Напишите программу, которая выводит все четырехзначные числа от n до m, в которых все цифры разные.
Помогите пожалуйста, заранее спасибо!
Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика
Добрый день!
Помогите в написании программы, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры.
В массиве b (15) четные элементы заменить 5, а не четные - 1
Напишите пожалуйста код. Спасибо большое!
Найти объем пирамиды и длину высоты опущенной из вершины D на грань ABC
Даны вершины пирамиды. найти объем пирамиды и длину высоты опущенной из вершины D на грань ABC A(2; 2; — 3), В(3; 1;1), С(–1;0; —5), D(4; –2; –3)
Изобразить две движущиеся точки (круга), траектории которых являются концентрическими окружностями
InitGraph, Необхдимо написать код используя Graph и CRT.
Используя стандартные модули GRAPH и CRT системы программирования Pascal, составить алгоритм и программу для получения анимированного...
Протабулировать функцию
Разветвление в цикле. Составьте блок-схемы и исходный код с использованием цикла с предусловием и потусловием, используя условный оператор IF.
Вычислить значения функции
F=at^3-bt
...
Протабулировать функцию
Разветвление в цикле. Составьте блок-схемы и исходный код с использованием цикла с предусловием и потусловием, используя условный оператор IF.
Вычислить значения функции
Z=\frac{x}{(x-2.3)^2}...
Проверить, есть ли в введённом тексте пара одинаковых символов, вывести эти символы либо сообщение об отсутствии
Проверить, есть ли в введённом тексте пара одинаковых символов. Сообщить эти символы, если есть и вывести сообщение об отсутствии пар символов.
Изобразить правильный треугольник, вращающийся в плоскости экрана вокруг своего центра
Используя стандартные модули GRAPH и CRT системы программирования Turbo Pascal, составить алгоритм и программу для получ
Изобразить на экране правильный треугольник, вращающийся в плоскости экрана...
Удалить все символы 'а' из слов, длина которых равна выбранной
Паскаль! Помогите пожалуйста с задачей. Удалить все символы 'а' из слов, длина которых равна выбранной. используя процедуры.
Определить количество дней с температурой воздуха ниже среднего значения
Информация о температуре воздуха за 15 дней месяца задана в виде вещественного массива. Элементы массива вводятся с клавиатуры. Определить количество дней с температурой воздуха ниже среднего...
Вычислите значение заданной функции, если Х изменяется от Хнач до Хкон с шагом ΔХ
Вычислите значение заданной функции, если Х изменяется от Хнач до Хкон с шагом ΔХ (в качестве исходных данных может использоваться другая переменная. Если при функции стоят знаки суммы (∑)или...
Поменять местами минимальные и максимальные элементы матрицы "а" на соответствующие матрицы "б"
Помогите пожалуйста! Напишите программу через чтение файла из блокнота. Чтобы матрица была записана в блокноте а паскаль её прочитал и сделал условие.
А) 1,0,1,2
4,3,2,1
0,-4,8,9
Б) 2,7,4,4 ...
Как посмотреть файл .rec, использующийся в turbo pascal, на windows?
Здравствуйте, есть файл с расширением .rec, использующийся в коде (turbo pascal 7.0).
В интернете нашел информацию, что он используется для связи переменной и файла.
Могу ли я его открыть на...
Ошибка выполнения 215. Арифметическое переполнение
Вот такое мне пишет на такой код:
var n, tri: integer;
begin
write('Введите число ');
read(n);
tri:=0;
repeat
begin
tri:=tri*10+(n mod 3);
Вычислить сумму ряда
Помогите решить, не могу понять как это сделать
Ряд|Контрольная формула
\frac{1}{6}-\frac{13}{36}x+\frac{19}{216}x^2-\,...\,+\left(\frac{(-1)^n}{2^{n+1}}-\frac{1}{3^{n+1}} \right)x^n+\,...\ \ \...
Массивы произвольной длины
Если кому интересно, могу подсказать оформление процедур/функций так, чтобы можно было в качестве входной переменной подставлять массивы произвольной длины.
Обработать число в двоичной форме
Очень нужно написать эту программу на паскале.
Программа принимает n-значное число и переводит его в двоичную систему счисления. Получившиеся число проходит через условия:
1) Считается...
Получение практических навыков в написании программ с использованием МОДУЛЕЙ
Дано два вещественных одномерных массива:
Массив J
J= - 9.0 J= 4.3 J= -8.6 J= -1.2 J= -3.2
J= -2.4 J= 6.7 J= 8.0 J= 4.2 J= - 8.3
Массив T
T= -2.8 T= -5.5 T= 7.2 T= -2.6 T= 3.2
T= -3.0 T= -1.3...
Определить сумму цифр первой половины числа (старшие разряды)
2. Дано натуральное число n (n>9). Определить сумму цифр в первой половине
числа (старшие разряды). Пример: n = 12 345 678, сумма равна 1+2+3+4=10.
Кириллица в названии программы
Пытаюсь написать таким образом
Program 'название';
Курсор начинает мигать под первым апострофом.
Ошибка 2: Предполагается идентификатор.
Каков синтаксис?
Даны два двумерных вещественных массива А[3][2], В[3][2]. Найти элементы двумерного массива С[3][2]
Даны два двумерных вещественных массива А, В. Найти элементы двумерного массива С по формуле:
сij = a ij+ bij . Вывести массив С на экран
Выведите на экран числа в заданном виде
1. Выведите на экран числа в следующем виде:
1
2 2
3 3 3
4 4 4 4
5 5 5 5 5
и т.д. (количество строк – N, вводимое с клавиатуры).
Перед каждым словом «дом» добавить слово «большой»
помогите решить пожалуйста .Составить программы, с помощью которых:
- сформировать текстовый файл из строк, которые должны быть введены с клавиатуры;
- перед каждым словом «дом» добавить слово...
Перед каждым словом «дом» добавить слово «большой»
Составить программы, с помощью которых:
- сформировать текстовый файл из строк, которые должны быть введены с клавиатуры;
- перед каждым словом «дом» добавить слово «большой».
program er;
var
...
В заданном предложении перед каждым словом вставить символ "?"
Напишите программу, которая в заданном предложении перед каждым словом вставляет символ "?". Напечатайте преобразованный текст, а также длину полученного предложения
Написать программу ввода с клавиатуры и вывода на экран значений одномерного массива
№1.
Написать программу ввода с клавиатуры и вывода на экран значений одномерного массива А, состоящего из n вещественных элементов (n=10). Найти сумму элементов этого массива и вывести ее на экран....
Решение квадратного уравнения
Написать программу решения квадратного уравнения. Программа должна проверять правильность исходных данных и в случае, когда коэффициент при второй степени неизвестного равен нулю, выводить...
Ввести три числа, найти их сумму, произведение и среднее арифметическое
Всем привет.Помогите, плиз. Срочно нужно написать пару простейших программ в паскале. В школе задали по информатике написать в паскале. А я несколько уроков пропустил из-за олимпиад по английскому....
Написать программу, которая 10 раз выводит на экран имя и фамилию.
Написать программу, которая 10 раз выводит на экран имя и фамилию.
Определить простое число или нет
Нужна помощь.
Как написать программу что бы она определяла какое число вводишь простое или нет.
Найти сумму цифр трехзначного числа
ТАКАЯ ЗАДАЧКА)
Вводим трехзначное натуральное число.Нужно найти сумму чисел этого числа.
program nomer;
var
N:real;
begin
writeln('vvedite chislo ');
readln(N);
N:=(N div 100)+((N div 10)...
Скачать Турбо Паскаль 7.0
Скачать Турбо Паскаль 7.0(исправлено)
https://www.cyberforum.ru/pascal/thread48833.html#post253739
Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно
Желательно сделать в Pascal или Delphi
Как написать корень 3й степени?
Подскажите, пожалуйста, как в Паскале вводить корень в третьей степени.
Т.е. нужно решить выражение :
W=√(x^2+a) - a2sin2(x+b)/2 и
Y = cos3x^3/3 - x/∛(a^2+b^2 )
При с=1.6, b=14.7,...
Написать программу вычисления стоимости покупки с учетом скидки
Практическое задание №9
Написать программу вычисления стоимости покупки с учетом скидки. Скидка в 3% предоставляется в том случае, если сумма покупки больше 500 руб., в 5% − если сумма больше...
Упорядочить массив по убыванию
1. Дан Одномерный массив.Упорядочить его по убыванию.
2. Дан Одномерный массив.Найти количество положительных чисел.
Помогите сделать Программки)Плз)
Где скачать Turbo Pascal на windows 7 c 64 рех разрядной
Дайте мне силку на Turbo Pascal на 7
Простейший калькулятор
Помогите написать простейший калькулятор который умеет + - : * и все...
Написать программу вычисления площади треугольника
Написать программу вычисления площади треугольника, если известна длина основания и высота. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем,...
Ввести с клавиатуры 2 целых числа и напечатать их сумму их сумму, разность, произведение
Ввести с клавиатуры 2 целых числа и напечатать их сумму их сумму, разность, произведение, а также результат целочисленного деления.
Добавлено через 3 минуты
Калькулятор в Паскале.
Для начала привет! Прошу не критиковать меня за глупые вопросы- я только начинаю.
А теперь к задаче. Я писал прогу на паскаль типа калькулятора. Вот сам код:
Program kalkulator;
Var a,b,c: real;...
Где скачать Turbo Pascal 7.0?
уважаемые,подскажите где скачать турбо паскаль, который содержит инсталяционный файл.
Определить номер подъезда и этажа по номеру квартиры девятиэтажного дома
Определить номер подъезда и этажа за номером квартиры девяти-этажного дома, учитывая, что на каждом этаже 4 квартиры, а нумерация квартир начинается с 1 подъезда.
Как записать тангенс?
Как записать на Паскаль формулу: tg(x)? Ответьте, пожалуйста!
Составить программу решения квадратного уравнения
Составить программу решения квадратного уравнения ax 2+bx+c=0.
Как записать число E в паскале?
Как записать число E = 2.71828183 в паскале, создать переменную?.
Нашел в инете что e это экспонента, как тогда записать e^x ?
exp(x) :D
Определить, в какой координатной четверти находится точка
заданы координаты точки (x,y).в какой координатной четверти находится точка? если точка находится на одной из осей сообщить об этом.
помогите первый раз столкнулся с такой задачей
Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры
Пример выходных данных:
Введите температуру
Понедельник>> 12
Вторник>> 10
Среда>> 16
Четверг>> 18
Пятница>> 17
Суббота>> 16
Воскресенье>> 14
Нарисовать домик
Нарисовать домик, чтобы при нажатии на «А» свет в окне загорался, а потом гаснет при нажатии «В»
Дана последовательность действительных чисел a1, a2, ..an. Выяснить, будет ли она возрастающей
Вариант 4. Дана последовательность действительных чисел a1, a2, ..an. Выяснить, будет ли она возрастающей. Напишите текст программы который бы выпонлял условие проги , заранее спасибо
Определить, сколько можно купить быков, коров и телят
составить алгоритм решения задачи: сколько можно купить быков, коров и телят, платя за быка - 10 руб, за корову - 5 руб, а за теленка - 0,5 руб, если на 100 рублей надо купить 100 голов скота.
Даны два действительных числа x и y. Вычислить их сумму, разность, произведение и частное
а)F=x^2(x^2+1)
б)Даны два действительных числа x и y. Вычислить их сумму, разность, произведение и частное.
в) при любых исходных значений.
Даны два числа. Числа вводятся с клавиатуры. Найти их сумму, разность, произведение и частное.
Здравствуйте. Пожалуйста напишите: Даны два числа. Числа вводятся с клавиатуры. Найти их сумму, разность, произведение и частное.
Найти расстояние между двумя точками с заданными координатами
Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2).
Вычисление функции на отрезке [a,b) с шагом h
Пожалуйста помогите!
Составить программу для вычисления функции F(x) на отрезке [a,b) с шагом h. Результат записать в виде таблицы первый столбец которой - значения аргумента, второй - соотв...
Определить является ли число палиндромом через цикл while
Определить является ли число палиндромом через цикл while
Добавлено через 16 минут
Число 455554
Найти сумму нечетных элементов массива
6.4) Дан массив целых чисел. Найти сумму нечетных элементов;
Определить, бьет ли слон фигуру
Вот такая чудная задача...Требуется определить, бьет ли слон, стоящий на клетке с указанными координатами (номер строки и номер столбца), фигуру, стоящую на другой указанной клетке. Вводятся четыре...
Вычисление площади и объема цилиндра
Доброго времени суток! В который раз нуждаюсь в вашей помощи...
Создать программу для вычисления площади поверхности и объема цилиндра по принципу "ввод значений -> результат"
Информация к...
Дан массив действительных чисел из N членов подсчитать сколько в нем отрицательных, положительных и нулевых элементов
дан массив действительных чисел из N членов подсчитать сколько в нем отрицательных, положительных и нулевых элементов
Составить программу, которая по введенному номеру месяца выдает, сколько дней в этом месяце
1)Составить программу, которая по введенному номеру месяца выдает, сколько дней в этом месяце. Год считать не високосным.
В двумерном массиве найти максимальный элемент и его индекс
В двумерном массиве найти максимальный элемент и его индекс.
Треугольник задан координатами своих вершин.Найти периметр и площадь треугольника
Треугольник задан координатами своих вершин.Найти периметр и площадь треугольника.
Вычислить площадь правильного шестиугольника, используя подпрограмму вычисления площади треугольника
решить с использованием функций и процедур...
1.вычислить площадь правильного шестиугольника со стороной a, используя подпрограмму вычисления площади треугольника.
2.вычисление суммы...
Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и карандашей
Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и карандашей. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем,...
Найти расстояние между двумя точками с заданными координатами
Решите плиииз легенькую задачку) Очень надо
Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2).
Как заполнить массив и отрицательными и положительными числами
это только положительными, а как чтобы и отрицательными и положительными??? Заранее благодарю.
Matr:=Random(99);
Определить, целое ли число
Извиняюсь за глупый и наверняка обсуждавшийся на этом форуме вопрос, но найти ответ на него через поиск я не смог(не смог правильно сформулировать).
Сам вопрос в названии темы.
Правильная кодировка - настроить DOSBox v0.74
русские символы пусть показывает правильная кодировка в Pascal, настроить DOSBox v0.74.
Есть ли в числе 2 одинаковые цифры
Ввести целое число и определить, верно ли, что в его записи есть две одинаковые цифры.
Пример:
Введите целое число: Введите целое число:
1234 224
Нет. ...
По номеру дня недели вывести его название
составить программу,которая в зависимости от порядкового номера дня недели (1,2,...,7) выводит на экран его название(понедельник,вторник,...,воскресение)
Вывести 5 раз на экран слово "Информатика"
Очень срочно нужно написать программу в Паскале и нарисовать к ней блок-схему! Тип: Арифметический цикл.
Вывести 5 раз на экран слово "Информатика"!
Запись числа в римской системе счисления
Задача такая: Напишите процедуру, которая выводит на экран запись переданного ей числа в римской системе счисления. Я сделала перевод, но здесь нужна процедура. Подскажите, можно не меняя основную...
Найти сумму элементов побочной диагонали матрицы
Дана квадратная целочисленная матрица 7х7. Найти сумму элементов ее побочной диагонали.
Заранее спасибо :)
Определить пройдет ли кирпич в прямоугольное отверстие
1)Имеется прямоугольное отверстие со сторонами а и b и кирпич с ребрами х, у, z. Требуется определить пройдет ли кирпич в отверстие.
программу можно и не писать))чем делать и как?
Даны длины ребер прямоугольного параллелепипеда. Найти его объеми площадь поверхности
почему то выдает ошибку!
Begin6 Даны длины ребер a,b,c прямоугольного параллелепипеда. Найти его объем V = a*b*c и площадь поверхности S = 2*(a*b+b*c+a*c).
Program Begin6;
var
a,b,c:real;...
Упорядочить массив по возрастанию
Дан целочисленный массив А(N), заполненный датчиком случайных чисел на интервале (0, 100). Упорядочить данный массив по возрастанию.
Найти сумму членов ряда
1.
Составить программу, выполняющую расчет следующей суммы 1^2+2^2+3^2+…+n^2. Значение n определяется из условия n = 2*х, где значение х вводится пользователем при работе с программой.
2....
Решение квадратного уравнения ax2+bx+c=y
Написать программу решения квадратного уравнения ax2+bx+c=y.
Даны катеты прямоугольного треугольника. Найти его периметр
Даны катеты прямоугольного треугольника. Найти его периметр помогите пожалуста(
Сортировка массива по убыванию суммы цифр числа
Задача:Напишите программу, которая сортирует массив по убыванию суммы цифр числа. Используйте функцию, которая определяет сумму цифр числа. Я сделала обычный "метод пузырька" (от меньшего к...
Складывать числа, введенные с клавиатуры, пока не будет введен 0
напишите программу которая вводит целые числа с клавиатуры и складывает их пока не будет введено число 0. написать в виде цикла с параметром, с предусловием и с постусловием. помогите!!!
Задержка в Паскале
Привет всем! Подскажите как релизовать задержку(delay) на паскале? На самом простом примере: сначало выводится число 1 через 5секунд 2 и т.д
При использовании функции log (x) при компиляции выводится ошибка "unknown identifier"
Добрый день,
при использовании функции log(x) при компиляции выводится ошибка "unknown identifier". Разве эта функция не встроенная?
Обьясните, пожалуйста, в чем дело.
Разбить число на цифры.
как в паскале разбить число на цифры???
Как находится минимальный максимальный элемент массива?
Как находится минимальный максимальный элемент массива?
Алгоритм + пример. Спасибо
Составить программу решения линейного уравнения
Составить программу решения линейного уравнения ax=b.
Составьте программу вычисления суммы всех двузначных чисел
Составьте программу вычисления суммы всех двузначных чисел с помощью модуля. В модуле организовать работу цикла.
Поменять цвет текста и фона
у меня есть программа, курсовая, как мне поменять цвет текста и фона, хочу разные цвета текста, например при выборе действия программы был у каждого действия свой цвет..
например список:
1) марка...
Строки. Рекурсия. Как посчитать количество букв в строке?
Начала разбирать строки по книжке. Там есть как посчитать кол-во слов, пробелов, нахождение самого длинного слова и т.д.
А вот как посчитать кол-во символов в строке? В книге этого, как отдельной...
Дан радиус окружности.Найти длину и площадь круга
я проболела эти темы ничего не понимаю.Если не затруднит составьте пожалуйста программу и блок схему
Поменять местами значения переменных x и y
Поменять местами значения переменных x и y:
a) C использованием промежуточной переменной(t:=x; x:=y; y:=t);
б) Без использования промежуточной переменной(x:=x-y; y:=x+y; x:=y-x)
Вычисление длины отрезка по координатам его концов
Помогите решить задачу:
Напишите функцию вычисления длины отрезка по координатам его концов. С помощью этой функции напишите программу вычисляющую периметр треугольника по координатам трех его...
Заполнить двумерный массив случайными числами по главной диагонали
Мы наловчились заполнять двумерные массивы номерами
циклов. А теперь задача: Заполнить двумерный массив случай-
ными числами по главной диагонали. Напечатать оба массива.
Вот такую программу...
Запросить у пользователя номер месяца и вывести на экран соответствующее название времени года
Используя оператор выбора, написать программу которая запрашивает у пользователя номер месяца и выводит на экран соответствующее название времени года. В случае если пользователь укажет недопустимое...
Напишите программу, которая определяет, верно ли, что введённое число состоит из одинаковых цифр
Напишите программу, которая определяет, верно ли, что введённое число состоит из одинаковых цифр
Входные данные
Входная строка содержит одно натуральное число.
Выходные данные
Программа должна...
Определить, к какому дню рождения сумма подарка превысит 100
1.Богатый дядюшка подарил мне 1 доллар в мой первый день рождения. В каждый следующий день рожденье он удваивал сумму подарка и прибавлял к ней столько долларов, сколько лет мне исполнилось. Написать...
Дано натуральное число: Найти количество четных цифр числа;
Помогите решить на паскале пожалуйста.
Дано натуральное число: Найти количество четных цифр числа; верно ли, что данная цифра А встречается в числе более двух раз (А вводится с клавиатуры). Найти...
Числа вводятся с клавиатуры (кол-во и сами числа). Среди чисел найти сумму кратных 4 и оканчивающихся на 4
Числа вводятся с клавиатуры (кол-во и сами числа). Среди чисел найти сумму кратных 4 и оканчивающихся на 4.
Найти минимальное значение массива
const;
n=10;
var
A:array of integer;
i,min:integer;
begin
min:=A;
for i:=2 to N do
begin
If A<min then min:=a;
Cоставить программу, находящую сумму элементов массива
1. составить программу,находящкю сумму элементов массива
2.составить программу,находящую сумму элементов массива, кратных заданному числу
3. сост. программу находящую номера четных элементов...
Получить целую часть числа
приветик...помогите составить программы да четверга надо прошу вас:
Дано действительное число х. Получить целую часть
*) числа х; затем – число х, округленное до ближайшего целого; затем – число x...
Сортировка слов по алфавиту
Помогите написать программу:
1)Программа запрашивает ввести слово (10 раз)
2)Пользователь вводит любые слова (10 раз)
3)Программа сортирует и выводит ,введённые пользователем слова, в алфавитном...
Определите значение переменной а после выполнения фрагмента алгоритма
Помогите пожалуйста с написание программы Pascal И составить программу рассчитывающая функцию. И все под номером 5. За ранние спасибо!!!!
Дано натуральное число. Определить его максимальную и минимальную цифру
2. Дано натуральное число.
Определить его максимальную цифру.
Определить его минимальную цифру.
Поменять местами первую и последнюю цифры числа
2 задача найти количество четных цифр натурального числа
Составить прогрмму получения из слова "дисковод" слова "воск", используя операцию сцепления и функцию Copy
Составить прогрмму получения из слова "дисковод" слова "воск", используя операцию сцепления и функцию Copy.
Program test;
var s: string;
tp_1,tp_2: string;
begin
s:='дисковод';
...
Строки. Вывести строку в обратном порядке
здравствуйте, помогите пожалуйста решить задачу по строке: дана строка, вывести строку, содержащую те же символы, но расположенные в обратном порядке.
Написать программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу [0,5)
1)Написать программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу РЕШИТЬ С ПОСТУСЛОВИЕМ)
4)Написать программу, которая выводит на экран таблицу стоимости телефонных...
Как задать размер массива?
Помогите, я только начал изучать Pascal, и вот не могу понять, как мне указать размер массива, если я заранее не знаю какой размер он должен иметь. Например 1..10 или 1..20. В С можно было бы...
Известны две скорости: одна в километрах в час, другая - в метрах в секунду. Какая из скоростей больше?
Известны две скорости: одна в километрах в час, другая - в метрах в секунду. Какая из скоростей больше?
Найти сумму элементов главной диагонали двумерного массива
найти сумму элементов главной диагонали двумерного массива Х(5,5)
Вычислить сумму и число положительных элементов матрицы
Вычислить сумму и число положительных элементов матрицы A, находящихся над главной диагональю
Составьте программу, выводящую на экран квадраты чисел от 10 до 20
Составьте программу, выводящую на экран квадраты чисел от 10 до 20
Определить длину строки
Ввести фамилию, имя и отчество в одну строковую переменную. Определить длину строки.
Вывести фамилию и инициалы (Фамилия И.О.)
Отсортировать одномерный массив по возрастанию
var
a:array of integer;
i,j,a,b:integer;
begin
for i:= 1 to 10 do begin
a:= random(20);
write(a,' ');
if a > 0 then
inc(a);
end;
Написать программу, вычисляющую среднее арифметическое
Написать программу, вычисляющую среднее арифметическое последовательности положительных чисел. Числа вводятся с клавиатуры, ввод нуля – это признак конца последовательности
Определить, есть ли в массиве элементы с одинаковыми значениями, не обязательно стоящие рядом
Задача:Заполните массив случайными числами. Определить, есть ли в нем элементы с одинаковыми значениями, не обязательно стоящие рядом. У меня получилось так Var A: array of integer;
i, m:integer;...
Определить, равен ли квадрат заданного трехзначного числа кубу суммы цифр этого числа
помогите пожалуйста решить пару простеньких задач....никогда просто на паскале не работала а тут задали такое....ппц
1)Определить, равен ли квадрат заданного трехзначного числа кубу суммы цифр...
Метод Эйлера для решения дифференциального уравнения
помогите создать программу решающую диф уравнение y'=2x^2+2y где х0=0 yo=1 h=0,2
на паскале или делфи.методом эйлера и модифицированным методом эйлера+методом рунге кутта.
В кафе мороженое продают по три шарика и по пять шариков. Можно ли купить ровно k шариков мороженого?
Добрый день, товарищи, вот есть такая задачка...
В кафе мороженое продают по три шарика и по пять шариков. Можно ли купить ровно k шариков мороженого?
Что-то в решении у меня не получается,...
Дан массив а(n) вывести элементы массива на экран в обратном порядке
Дан массив а(n) вывести элементы массива на экран в обратном порядке
Написать программу, которая вычисляет сумму всех четных чисел в диапазоне от 1 до n
Напишите программу которая вычисляет сумму всех четных чисел в диапазоне от 1 до n.
С начала суток прошло n секунд. Определить сколько полных часов прошло с начала суток
2. С начала суток прошло n секунд. Определить сколько полных часов прошло с начала суток;
Дано натуральное число n. Получить все простые делители этого числа
Дано натуральное число n. Получить все простые делители этого числа.
Составьте блок-схему и программу, для вычисления значений функции у в зависимости от заданного с клавиатуры значения аргумента х
3. Составьте блок-схему и программу, для вычисления значений функции у в
зависимости от заданного с клавиатуры значения аргумента х:
По заданным координатам точек А и В вычислите длину отрезка АВ
Составьте программу, Пример входных данных: ха=10 ya=2 xb=10 yb=7 Пример выходных данных: |AB|=10.0
P.s. Заранее спасибо)
По введенному k – числу грибов напечатать фразу «Мы нашли в лесу k грибов»
Составьте программу, которая по введенному вами k – числу грибов печатает фразу «Мы нашли в лесу k грибов», причем согласовывает окончание слова «гриб» с k. (Количество грибов может быть любым целым...
Заданы три числа a,b,c. Определить могут ли они быть сторонами треугольника
Заданы три числа: a,b и c. Определить, могут ли они быть сторонами треугольника и, если да, определить его тип: равносторонний, равнобедренный, произвольный.
Дан одномерный массив чисел. Подсчитать в нем количество элементов равных нулю, отрицательных элементов и положительных элементов
1)из заданной строки напечатать только заглавные английские буквы и их коды
2)Дан одномерный массив чисел. Подсчитать в нем количество элементов равных нулю, отрицательных элементов и...
Составить программу для вычисления таблицы значений функции y=x^2+3(cos)^2*2x на отрезке [0;3] если Х на этом отрезке изменяется с шагом 0.2
Составить программу для вычисления таблицы значений функции y=x^2+3(cos)^2*2x на отрезке если Х на этом отрезке изменяется с шагом 0.2. Найти сумму, произведение, количество, среднее арифметическое,...
Даны действительные числа а,b, с. Удвоить эти числа, если a>b>c, и заменить их абсолютными значениями, если это не так
Даны действительные числа а,b, с. Удвоить эти числа, если a>b>c, и заменить их абсолютными значениями, если это не так.
Найти площадь кольца, внутренний радиус которого равен R1, а внешний радиус равен R2
Найти площадь кольца, внутренний радиус которого равен R1, а внешний радиус равен R2 (R1 < R2)
Решить в паскале) Плиз решите пожалуйста, за ранее спасибо)
Декомпилятор
Здравствуйте всем.
Скажите есть ли декомпилятор exe файлов сделанных на паскале?
И если есть где можно скачать
Створити числовий масив А з 10 елементів. Обчислити суму від'ємних елементів.
Створити числовий масив А з 10 елементів.
Обчислити суму від'ємних елементів.
Правило форума 1.4. Официальный язык форума - русский.
Написать программу, которая вычисляет квадрат и квадратный корень числа
помогите написать программу, которая будет спрашивать число и выводить на экран квадрат и его квадратный корень, после этого программа должна спрашивать, нужно ли ей посчитать корень для след числа.
Составьте программу сложения двух простых дробей. Результат должен быть несократимой дробью
Составьте программу сложения двух простых дробей. Результат должен быть несократимой дробью. Используйте подпрограмму вычисления НОД по алгоритму Евклида. Простая дробь задаётся двумя целыми числами:...
Сделать программу которая по номеру дня недели - целому числу от 1 до 7 выдает в качестве результата количество уроков
Сделать программу которая по номеру дня недели - целому числу от 1 до 7 выдает в качестве результата количество уроков в классе в соответствующий день.
1 день-4 урока
2 день-2 урока
3 день-4 урока...
Лапы у гусей и кроликов
Известно, что у кроликов и гусей вместе 64 лапы. Нужно написать все варианты программно. Их всего 17
Вычисление сопротивления электрической цепи, состоящей из двух сопротивлений
Делал по этой задаче:
4) Написать программу вычисления сопротивления электрической цепи, состоящей из двух сопротивлений. Сопротивления могут быть соединены последовательно или параллельно. Ниже...
Найдите число десятков в его десятичной записи
Вроде задача легкая, она звучит так...Дано натуральное число. Найдите число десятков в его десятичной записи (то есть вторую справа цифру его десятичной записи).
Вот код...
program z1;
var...
Найти сумму цифр введенного 4-значного числа
Если можно, то полностью. Зарание спасибо
Даны два числа.Найти среднее арифметическое их квадратов и среднее арифметическое их модулей
Даны два числа.Найти среднее арифметическое их квадратов и среднее арифметическое их модулей
Добавлено через 2 часа 31 минуту
Посмотрите. И исправте если не трудно
Program f;
var a,b:real;
...
Ввести символьную строку и проверить, является ли она палиндромом
Ввести символьную строку и проверить, является ли она палиндромом (палиндром читается одинаково в обоих направлениях).
Помогите пожалуйста ребята)))!!!
Написать программу которая вычисляет наибольший общий делитель двух целых чисел
Написать программу которая вычисляет наибольший общий делителр двух целых чисел
Добавлено через 56 секунд
program p1;
var p, n,m,n1, m1,result: integer;
begin
writeln ('Введите два числа');...
Дана строка, содержащая текст. Найти длину самого короткого слова и самого длинного слова
Дана строка, содержащая текст. Найти длину самого короткого слова и самого длинного слова.
Как заполнить массив буквами английского алфавита ?
Как заполнить массив (с помощью цикла for) буквами английского алфавита ?
Напишите программу, которая заменяет во всей строке одну последовательность символов на другую
Напишите программу, которая заменяет во всей строке одну последовательность символов на другую.
Я пыталась сделать что-то такое, var
a: string;
b,c,e: integer;
d:char;
begin
write('Введите...
Как записать арктангенс в паскале?
А вообще функция такая:
\frac{\arctan\sqrt{x}}{{x}^{2}+0.5 \sin {x}}
надо записать в Паскале
Меньшее из двух чисел заменить половиной их суммы, а большее - их удвоенным произведением
Даны действительные числа Х и У, не равные друг другу. Меньшее из двух чисел заменить половиной их суммы, а большее их удвоенным произведением
даны 2 круга с общим центром и радиусами R1 и R2
Уважаемые форумчане,прошу помощи в решении этой задачи
даны два круга с общим центром и радиусами R1 и R2(R1>R2).найти площади этих кругов S1 и S2, а также площадь S3 кольца,внешний радиус которого...
С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток.
С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток.
Найти сумму чисел от 100 до 200, кратных 17.
Найти сумму чисел от 100 до 200, кратных 17.
Вводить числа до тех пор, пока их сумма не станет больше 100. Эту сумму и число слагаемых вывести на экран
1)Составить программу, которая вводит с клавиатуры целые числа до тех пор, пока их сумма не станет больше 100. Эту сумму и число слагаемых вывести на экран.
Помогите решить, пожалуйста
Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика.
1)Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры.
Добавлено через 16 часов 19 минут
апп
Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5
Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5
Спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал дневную норму на 10%
Спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал дневную норму на 10% от пробега предыдущего дня. Через сколько дней спортсмен будет пробегать в день больше 20 км?
Что такое randomize и random ?
процедура в паскале randomize и random это одно и тоже?
Дана непустая последовательность целых чисел, оканчивающаяся нулем. Найти:
Дана непустая последовательность целых чисел, оканчивающаяся нулем. Найти:
а) сумму всех чисел последовательности;
б) количество всех чисел последовательности.
Помогите пожалуйста решить...
По данному действительному числу a и натуральному n вычислите сумму 1+a+a2+...+an, не используя формулу суммы геометрической прогрессии.
По данному действительному числу a и натуральному n вычислите сумму 1+a+a2+...+an, не используя формулу суммы геометрической прогрессии. Время работы программы должно быть пропорционально n.
...
Даны два действительных числа А и В. Получить их сумму, разность и произведение
Даны два действительных числа А и В. Получить их сумму, разность и произведение
В целочисленных массивах a и b содержатся длины катетов десяти прямоугольных треугольников
В целочисленных массивах a и b содержатся длины катетов десяти прямоугольных треугольников:
a - длина первого катета;
b - длина второго катета i-го треугольника.
Найдите треугольник с наибольшей...
Запрашивать пароль до тех пор, пока он не будет правильно введен
21. Составить программу, которая запрашивает пароль (например, четырехзначное число) до тех пор, пока он не будет правильно введен. блок схема
Обработка двумерного массива. Найти минимальный и максимальный элемент
В матрице A 4х4 найти минимальный и максимальный элемент,вычеслить P=A min + A max.Построить новую матрицу,в которой к элементам всех строк,кроме второй,прибевлено P,вторая строка без изминений.
Как закрасить фигуру цветом?
Подскажите пожалуйста почему фигура закрашивается белым цветом(точнее как её закрасить цветом, который мне необходим)?:)
Program Sushka;
Uses Graph;
Var Gd,Gm:Integer;
Begin
InitGraph(Gd,Gm,'');...
Очистка экрана
Добрый вечер! подскажите,пожалуйста,как будет выглядеть код очистки экрана.
Например,мы запускаем программу,выполняем какие-нибудь действия(например расчеты) и я хочу очистить экран и выполнять...
Даны два действительные числа.Вывести первое число,если оно больше второго,и оба числа если это не так.
Даны два действительные числа.Вывести первое число,если оно больше второго,и оба числа если это не так.(Турбо паскаль)
Дано натуральное число n. Вычислить cos1/sin1 x cos1+cos2/sin1+sin2 x....x cos1+...+cos n/sin1+...sin n
2. Дано натуральное число n. Вычислить cos1/sin1 x cos1+cos2/sin1+sin2 x....x cos1+...+cos n/sin1+...sin n
Определение типа треугольника по длинам сторон
определите, является ли три числа прямоугольным, тупоугольным и остроугольным треугольником
Найти длину окружности и площади круга заданного радиуса
4. Составить схему алгоритма и программу на языке Паскаль для вычисления длины окружности и площади круга заданного радиуса.
Ввести с клавиатуры массив из 5 элементов, найти в нем 2 максимальных элемента и их номера
надо сделать полное тело задачи, от program до end)
решение любыми способами
Ввести с клавиатуры массив из 5 элементов, найти в нем 2 максимальных элемента и их номера.
Пример:
Исходный массив:...
Расширить открытое окно Паскаля на весь экран
Как можно расширить открытое окно Паскаля на весь экран?
Старояпонский календарь
26. В старояпонском календаре был принят 60-летний цикл, состоявший из пяти 12-летних подциклов. Подциклы обозначались названиями цвета: зеленый, красный, желтый, белый и черный. Внутри каждого...
Вычислить значение выражения
Всем привет!Прошу проверить мои переводы математических формул на язык паскаль.В файле изображение математических формул,а здесь я выложил перевод на паскаль.
1.
(2*cos(x-pi/6))/(1/2+sqr(sin(y)));...
Удалить лишние пробелы
Отредактировать предложение, удаляя из него лишние пробелы, оставляя только по одному пробелу между словами.
Убрать лишние знаки после запятой
Допустим, есть число - 5,34932482838349.
А нужно, чтобы выводилось только 5,349.
Составить программу вычисления площади кольца по значениям внутреннего и внешнего радиусов, используя подпрограмму
Дано: Составить программу вычисления площади кольца по значениям внутреннего и внешнего радиусов, используя подпрограмму вычисления площади круга (2 варианта: с процедурой и с функцией).
С...
Дано трехзначное число. Будет ли сумма его цифр четном числом
Дано трехзначное число N. Проверить будет ли сумма его цифр четном числом. Прошу срочно помочь пожалуйста. Только без констант
Программа вычисления корней квадратного уравнения
Сделал программу по вычислению корней квадратного уравнения,когда ввожу числа a,b,c и жму ввод вылазит такая ошибка-"eror 106: invaid numeric format." можете подсказать что не так?
program...
Определить, является ли целое число N четным двузначным числом.
Определить, является ли целое число N четным двузначным числом.
Нарисовать солнце
помогите нарисовать Красивое солнышко в Паскаль!)
пожалуйста!!!
Написать программу которая генерирует 10 случайных чисел
Написать программу которая генерирует 10 случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее арифметическое.
Программа на вычисление веса пользователя
Написать программу(на языке Паскаль) которая вычисляет оптимальный вес пользователя,сравнивает его с реальным и выдает рекомендации о необходимости поправиться или похудеть.Оптимальный вес...
Выводить числа от 1 до 10
написать в паскаль программу , которая выводит от 1 до 10
Заранее , большое спасибо _)
Найти среднее арифметическое положительных элементов массива
Добрый вечер помогите пожалуйста решить задачу и объяснить что к чему.... Вот сама Задача:
Дан массив A(20), найти среднее арифметическое положительных элементов массива.
Отображение break на Блок-Схеме
Не подскажите как нарисовать по этому Блок-Схему?
k10:=readkey;
while k10<>#13 do
begin
Case k10 of
#72: if pos=1 then pos:=5 else pos:=pos-1;
#80: if pos=4 then pos:=1 else...
Перевод всех букв в верхний регистр
Я в паскале ещё тупой не могу написать программу:
пользователь вводит слово и программа капсит все буквы
Найти произведение всех целых чисел от 8 до 15
Найти произведение всех целых чисел от 8 до 15
спасибо заранее
Написать программу, выводящую на экран таблицу умножения на 5
6) Написать программу, выводящую на экран таблицу умножения на 5 (используя цикл с параметром).
7) Решить задачу 6 используя цикл с предусловием
8) Решить задачу 6 используя цикл с постусловием
...
Найти наименьший элемент массива
zd_2
задан одномерный числовой мас из 10 чисел необходимо найти наименьший элемент массива
Требования к заданию
а)ввод исх. данных в мас с использованием структуры цикл с предусловием(при отладке...
Найти количество чисел оканчивающихся на число 6
помогите ,пожалуйста (собрать программу на Pascal)
дано произвольное количество чисел. найти количество чисел оканчивающихся на число 6 (цикл работает до тех пор, пока вы не введете отрицательное...
Найти минимальный и максимальный элемент массива.
массив N вещественных чисел, отображаемых на экране найти минимальный и максимальный элемент.
заранйе спасибо!!!
Составить программу, которая печатает true, если точка с координатами (x,y) принадлежит закрашенной области
Составить программу, которая печатает true, если точка с координатами (x,y) принадлежит закрашенной области, и false в противном случае:
Произведение чисел от 1 до N
Составьте программу, которая вычисляет произведение чисел от 1 до N. Значение N вводится с клавиатуры
Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и такого же количества обложек к ним
1. Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и такого же количества обложек к ним. Ниже представлен рекомендуемый вид экрана во время работы программы (данные,...
Подсчитать сумму всех целых чисел от 1 до 100
2. Подсчитать сумму всех целых чисел от 1 до 100. Печатать на экране строки "Сумма чисел от 1 до 100 и значение переменной S.
Даны 2 действительных числа, меньшее из них заменить полусуммой этих чисел, а большее их произведением.
Даны 2 действительных числа, меньшее из них заменить полусуммой этих чисел, а большее их произведением.
Дано натуральное число. Найти сумму цифр этого числа
Дано натуральное число:
− найти сумму цифр этого числа;
− верно ли, что число начинается и заканчивается одной и той же цифрой.
Закончить выполнение программы после выполнения условия
как закончить выполнение программы после выполнения условия в паскале????
Если целое число m делиться на целое число n, то вывести на экран частное от деления
Помогите пожалуйста решить задачу.
Задача: Если целое число m делиться на целое число n, то вывести на экран частное от деления, в противном случае вывести на экран сообщение "m на n нацело не...
Как запустить написанную программу на выполнение
Помогите запустить Turbo Pascal. Суть проблемы:
пишу любую программу, пусть даже самую простую а+б=с, нажимаю Compile или Make - программа пишет, мол, скомпилированно, и все! Что делать?
Проверить, выполняются ли неравенства a<b<c
помогите с любой задачей...
1) Даны действительные числа a, b, c. Проверить, выполняются ли неравенства a<b<c.
2) Даны два действительных числа. Заменить первое число нулем, если оно...
Удалить повторяющиеся символы из строки
помогите пожалуйста решить задачку.Она выглядит так:
Дано слово. Удалить из него все повторяющиеся буквы,оставив их первые вхождения.
Написать программу,которая выводит таблицу умножения на 7. Количество чисел задает сам пользователь.
Написать программу,которая выводит таблицу умножения на 7. Количество чисел задает сам пользователь.
Вывести на экран квадрат из звездочек
Задание: напишите процедуру,которая принимает параметр-натуральное число N и выводит на экран квадрат из звездочек со стороной N. Вроде делала по заданию, а ошибку не могу понять
procedure wr( ch:...
Квадратное уравнение
:help:Помогите пожалуста - составил програму для решения квадратного уравниея A*X2+B*X+C=0. Єто уравниние существует квадратным только єсли А неравно 0. Для поиска корней квадратного уравнения нужно...
Графика в паскале (построить график функции)
Необходимо построить графики заданной функции в паскале.
Условие задачи:
Построить графики функции, заданной в параметрически, при разных значениях параметра "а" (должна быть реализована...
Составить программу, которая заполняет массив а [1..10] случайными целыми числами в диапазоне от 1 до 10
составить программу, которая заполняет массив а случайными целыми числами в диапазоне от 1 до 10, затем найти произведение элементов с нечетными значениями и количество элементов с четными значениями
Перевод из строки в число
У меня задача:
Иммется файл, в котором записано 12 вещественных чисел. Переписать все числа файла в массив в том же порядке.
Т.е. я счита к примеру дан txt файлик, там числа, вот я хочу узнать а...
Написать программу проверки знания даты начала второй мировой войны
3)Написать программу проверки знания даты начала второй мировой войны. В случае неверного ответа пользователя программа должна выводить правильный ответ. Ниже представлен рекомендуемый вид экрана во...
Turbo Pascal for Windows 7
не могли бы подсказать где можно найти Turbo Pascal for Windows 7.
Дан двухмерный массив. Найти наименьший элемент массива в каждой строке
здравствуйте, помогите пожалуйсто мне информатика не даётся очень нужно решить данные задания.заранее спасибо очень надеюсь на этот форум
1. дан двухмерный массив вещественных чисел размерностью...
Написать программу пересчета величины временного интервала
№5
Написать программу пересчета величины временного интервала, заданного в минутах, в величину, выраженную в часах и минутах. Ниже представлен рекомендуемый вид экрана во время работы программы...
Написать программу, которая задумывает число в диапазоне от 1 до 10 и предлагает пользователю угадать число за 5 попыток
Возникла проблема, связанная с отсутствием мозгов )
Дали задание такого типа:
Написать программу, которая задумывает число в диапазоне от 1 до 10 и предлагает пользователю угадать число за 5...
Значение функции e^x (экспонента от x) равно сходящейся сумме бесконечного ряда:
Значение функции e^x(экспонента от x) равно сходящейся сумме бесконечного ряда: e^x=1+(x/1!)+(/2!)+(/3!)+...+/n!+...
Получите рекуррентную формулу для слагаемых. Используя операторы цикла...
Определить, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом
Напишите программу, которая определяет, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом (как, например, 221).
Входные данные
Входная строка содержит одно натуральное...
Даны два ненулевых числа. Найти их сумму, разность, произведение и частное
1. Даны два ненулевых числа. Найти их сумму, разность, произведение и частное.
Вывести квадраты и кубы 10 чисел
Вывести квадраты и кубы 10 чисел следующей последовательнсти 1,2,4,7,11,16,22,29,,37,46
(пояснение к 1 прибавить 1 равно 2, к 2 прибавить 2 равно 4, к 4 прибавить 3 равно 7 и т. д.)
Пример
1 1...
Найти произведение двузначных нечетных чисел, кратных 13.
Найти произведение двузначных нечетных чисел, кратных 13.
Напишите программу, которая выводит таблицу умножения
Помогите пожалуйста
Написать программу,которая выводит таблицу умножения,например на 7. Рекомендуемый вид экрана во время работы программы приведен ниже.Данные введенные пользователем, выделены...
Определить, в какую из областей (I или II) попадает точка с заданными координатами
Определить, в какую из областей (I или II) попадает точка с заданными координатами (для простоты принять, что абсцисса точки не равна трем).
Смешано V1 литров
Смешано V1 литров воды температуры t1 с v2 литрами воды температуры t2. Найти объём и температуру образовавшейся жидкости.