![]() |
|
Другие темы раздела | |
Turbo Pascal Создание файла (программа, с выполнением доп.функций)
https://www.cyberforum.ru/ turbo-pascal/ thread1197221.html Создать файл, содержащий сведения о сдаче студентами сессии. Каждая запись содержит поля: номер группы, фамилия, имя, отчество студента, оценки по пяти экзаменам и пяти зачетам (зачет, незачет). На экран и в отдельный файл вывести: фамилии неуспевающих студентов с указанием номера группы и количества задолженностей; средний балл, полученный каждым студентом группы Х и всей группой в целом.... |
Вычислить суммы элементов каждой строки матрицы X(6,6), записать их в массив Y Turbo Pascal Вычислить суммы элементов каждой строки матрицы X(6,6), записать их в массив Y, определить наименьшее значение этих сумм и номер соответствующей строки. |
Turbo Pascal Составить программу, которая изучает, одного ли знака числа, которые вводятся с клавиатуры
https://www.cyberforum.ru/ turbo-pascal/ thread1197135.html Помогите составить програму! |
Turbo Pascal Подставить значения x=sint, y=cost при -\pi \leq t\leq \pi uses Graph,Crt; var x1,x2:real;{границы изменения аргумента функции} y1,y2, :real;{границы изменения значения функции первого графика} y3, y4 :real;{границы изменения значения функции второго графика} x:real;{аргумент функции } https://www.cyberforum.ru/ turbo-pascal/ thread1197062.html |
Turbo Pascal Найти все неповторяющиеся элементы двухмерного массива Помогите с блок схемой!!!! program lab; uses crt; const nmax=20; var a:array of integer; x:integer; n,m,i,j,p,q,k:byte; begin writeln('Поиск неповторяющихся элементов двухмерного массива целых чисел');writeln; |
Turbo Pascal Поиск отрицательных и положительных элементов в массиве - арифметическое переполнение
https://www.cyberforum.ru/ turbo-pascal/ thread1197019.html var A:array of integer; i,j,s,m:integer; begin randomize; for i:=1 to 5 do begin writeln; for j:=1 to 5 do begin A:=random(50)-25; write(A,' '); end; |
Turbo Pascal Определить кто из кандидатов в президенты победит на выборах Определить кто из кандидатов в президенты победит на выборах,если приняли участие в выборах 50% сторонников первого кандидата и 75% сторонников второго?общее число сторонников первого кандидата-N человек,а второго-L человек. https://www.cyberforum.ru/ turbo-pascal/ thread1197018.html |
Допишите код, пожалуйста. Завтра последняя пара перед зачетом Turbo Pascal Сделал 4 из 5 лабораторных. Эту никак не могу. Мне помогли с заданиями 1 и 2 Dencil и Puporev. Нужно написать код к программам 10.3 10.4 10.5 . Помогите пожалуйста. Фотография с заданиями: (Ссылка на сторонний ресурс удалена) Вот код для первых двух: var B:array of integer; i,j:integer; begin randomize; |
Turbo Pascal Ошибка 215 при выполнении программы Не пойму,в чем ошибся с типами данных,выводит ошибку 215,а если исправить,кидает на черный экран. Ошибка в этой строке KN:=KN+1;.Помогите исправить,пожалуйста. PROGRAM ret; TYPE PROC=FUNCTION(X:real):real; TYPE ODN=array of real; VAR A,B,X,Fa,Fb:real; k,y:integer; EPS:ODN; fp1,fp2,fp3:text; FUNCTION FS(x1:real):real;FAR; Begin https://www.cyberforum.ru/ turbo-pascal/ thread1196858.html |
Turbo Pascal Обнулить отрицательные элементы, стоящие в чётных строках
https://www.cyberforum.ru/ turbo-pascal/ thread1196857.html Завтра последняя пара перед зачетом. Два задания я уже сделал. А на этой этом задании и застрял. Помогите, пожалуйста. (Ссылка на сторонний ресурс удалена) Заполните двумерный числовой массив В(6,6) случайными целыми числами в интервале . Выведите значения элементов массива в виде матрицы, причём на каждый элемент отведите 4 позиции. Ответ задачи следует выводить с новой строки и с... |
Turbo Pascal Арифметическое переполнение в двухмерном массиве Как исправить ошибку 215: Арифметическое переполнение. Помогите, пожалуйста program z1; var b:array of integer; s,i,j:integer; Begin s:=0; randomize; for i:=1 to 6 do for j:=1 to 6 do |
Turbo Pascal Создать программу реализующую два алгоритма сортировки одномерного массива: методом Шелла и быстрой сортировки ЗАДАЧА. Создать программу реализующую два алгоритма сортировки одномерного массива: сортировка методом Шелла и быстрой сортировки (Хоара). Предусмотреть пользовательскую возможность выбора метода сортировки. Вывести минимальный и максимальный элементы массива https://www.cyberforum.ru/ turbo-pascal/ thread1196694.html |
0 / 0 / 0
Регистрация: 17.01.2014
Сообщений: 13
|
|
0 | |
Найти сумму чисел,получаемых при последовательном вычеркивании первой цифры четырехзначеного числа - Turbo Pascal - Ответ 626527903.06.2014, 00:53. Показов 538. Ответов 0
Метки (Все метки)
дано натуральное число(четырехзначное) найти сумму чисел,получаемых при последовательном вычеркивании первой цифры числа
Попросили помочь, не пойму как это вообще реализовать, типо через mod div или как? Добавлено через 9 минут Тему закрыть разобрался Вернуться к обсуждению: Найти сумму чисел,получаемых при последовательном вычеркивании первой цифры четырехзначеного числа Turbo Pascal
0
|
|
03.06.2014, 00:53 | |
Готовые ответы и решения:
0
Найти сумму чисел, получаемых при последовательном вычеркивании последней цифры числа Найти сумму чисел, получаемых при последовательном вычеркивании последней цифры данного 5-значного числа |
03.06.2014, 00:53 | |
Помогаю со студенческими работами здесь
0
Найти сумму четырёхзначных чисел, получаемых при всевозможных перестановках Найти сумму первой и последней цифры числа Найти сумму первой и последней цифры числа |