![]() |
|
Другие темы раздела | |
Turbo Pascal В массиве из 15 элементов умножить все четные элементы на предпоследний
https://www.cyberforum.ru/ turbo-pascal/ thread1332377.html 1)В массиве из 15 элементов диапазоном -10;10 умножить все четные элементы на предпоследний 2)В массиве из 10 элементов из диапазона -5;5 найти последний положительный элемент и его номер 3)В... |
Turbo Pascal Вычислить сумму ряда
https://www.cyberforum.ru/ turbo-pascal/ thread1332408.html Вычислить сумму ряда \sum_{i=1}^{n}\sum_{j=1}^{m}sin({i}^{3}+{j}^{4}) Получить результат при n=50, m=30 const n = 50; m = 30; var s: real; i, j: integer; begin s := 0; |
Turbo Pascal Вставить в массив строку перед строкой Создать и вывести массив 5 на 6 целых из диапазона -5,10. Вставить в массив 4 строку перед 2 строкой. Сделал подобное, оно как бы делает нужное действие, но код слишком, хм, кривой. const... https://www.cyberforum.ru/ turbo-pascal/ thread1332305.html |
Turbo Pascal Составить одномерный массив по формуле
https://www.cyberforum.ru/ turbo-pascal/ thread1332419.html a={3.1;6.1;-0.2;-1.5;15} b={0.1;0.25;-4.1;-0.6;4.3} S = \sin \left(\sum_{i=1}^{5}({{a}_{i}+{b}_{i}})^{2}\right) Const a:array of real=(3.1,6.1,-0.2,-1.5,15); b:array of real=(0.1,0.25,-4.1,-0.6,4.3); Var i:integer; s:real; Begin For i:=1 to 5 do s:=s+sqr(a+b); writeln('S =... |
Turbo Pascal Таблица В задании(таблица 1) необходимо вывести на экран таблицу значений функции Y(x) и ее разложения в ряд S(x) для х изменяющихся от Xn до Xk с шагом h равным . Близость значений S(x) и Y(x) во всем... |
Turbo Pascal Составить процедуру вычисления минимального из двух чисел
https://www.cyberforum.ru/ turbo-pascal/ thread1332455.html 1 Задание. Составить процедуру вычисления минимального из двух чисел. Используя эту процедуру, вычислить минимальное из трех чисел. 2 Задание. Составить процедуру подсчета суммы значений элементов в... 1 Задание. Составить процедуру вычисления минимального из двух чисел. Используя эту процедуру, вычислить минимальное из трех чисел. Var a,b,c,m:real; Procedure Min(a,b:real;Var c:real); Begin ... |
Turbo Pascal Как нарисовать букву 'Ф' в паскаль? Здравствуйте, Есть такое задание: нарисовать букву "Ф" с помощью графики Турбо Паскаль. Вроде все понятно: рисуешь линии и эллипс, НО. Вот не выходит буква ровная и красивая. А завтра сдавать пора,... |
Turbo Pascal Дан массив А из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы Дан массив А из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы, сохраняя при этом взаимное расположение символов в каждой из этих двух групп. https://www.cyberforum.ru/ turbo-pascal/ thread1332397.html |
Turbo Pascal Составьте программу генерирующую все представления натурального числа N в виде суммы натуральных чисел Составьте программу генерирующую все представления натурального числа N в виде суммы натуральных чисел ( перестановки слагаемых нового способа не даст) |
Turbo Pascal Используя процедуру поменять местами первый и последний столбец матрицы
https://www.cyberforum.ru/ turbo-pascal/ thread1332431.html используя процедуру поменять местами первый и последний столбец матриах a и b размером N*M |
дана последовательность чисел a1 Turbo Pascal дана последовательность чисел a1 a2,... поменять местами минимально с максимальным короче мне нужна прога чтобы вбивать число любое от 1 до 1000 и она делала расчет типа например пишу 5 она выдает 5... |
Turbo Pascal Сортировка матрицы В матрице A(K,L), K <= 10, L <= 15 путём перестановки строк и столбцов добиться, чтобы максимальный по абсолютной величине элемент стал на место а11 const kmax=10;lmax=15; type mas=array of integer; var a:mas;k,l,i,j,imax,jmax,max:integer; procedure maxij(x:mas;var n,m,maxx:integer); var i,j:integer; begin maxx:=abs(a);n:=1;m:=1; for... |
0 / 0 / 0
Регистрация: 16.12.2014
Сообщений: 4
|
|
0 | |
Задача через оператор цикла for - Turbo Pascal - Ответ 699691716.12.2014, 21:20. Показов 807. Ответов 6
Метки (Все метки)
Написать на Паскале законченную программу ,печатающую числа от 99 до 9 и рядом с каждым из них его кубический корень с избытком 6
Вернуться к обсуждению: Задача через оператор цикла for Turbo Pascal
0
|
16.12.2014, 21:20 | |
Готовые ответы и решения:
6
Задача на оператор цикла Как записать оператор цикла for через while? |
16.12.2014, 21:20 | |
Помогаю со студенческими работами здесь
0
Вычислить факториал числа (через оператор цикла с известным числом повторений)
Задача на подсчет больничных через оператор switch
|
Новые блоги и статьи
![]() |
||||
Что нового в C# 14
UnmanagedCoder 10.03.2025
Предстоящая версия C# 14 обещает принести изменения, которые сделают разработку еще более приятной и эффективной.
Что стоит отметить, так это влияние сообщества разработчиков на формирование новых. . .
|
Формулы поворота
Igor3D 10.03.2025
Добрый день
Тема
Эти формулы приводятся во множестве тьюториалов, часто под видом "матрица вращения на плоскости".
x' = x * cos(a) - y * sin(a)
y' = y * cos(a) + x * sin(a)
Как бы Вы их. . .
|
Что нового в .NET 10
UnmanagedCoder 10.03.2025
. NET 10 выходит как релиз с длительной поддержкой (LTS), включающей три года обновлений. В этом обновлении Microsoft сфокусировались на нескольких направлениях: производительность, оптимизация. . .
|
Отложенное высвобождение, RCU и Hazard Pointer в C++26
NullReferenced 09.03.2025
Многопоточное программирование стало важной частью современной разработки. Когда несколько потоков одновременно работают с общими данными, возникает целый ряд проблем, связанных с синхронизацией и. . .
|
Неблокирующийся стек на C++26
NullReferenced 09.03.2025
Традиционные способы синхронизации в многопоточном программировании — мьютексы, семафоры, условные переменные — часто превращаются в узкое место в плане производительности. При этом неблокирующиеся. . .
|
Обработка строк в C++26: Новые возможности string и string_view
NullReferenced 09.03.2025
Новый стандарт C++26 предлагает много улучшений для работы с привычными string и относительно новыми string_view.
string_view - это невладеющая ссылка на последовательность символов, появившаяся в. . .
|
Мой первый аддон для Blender 3D, с помощью нейронки (не зная даже азов пайтона, но это не значит что так и с остальным).
Hrethgir 09.03.2025
Потратил весь день. Пол-дня мне хватило, чтобы понять что с версией с 14B мне не одолеть написание функционального кода, на языке с которым я вообще никак не знаком - пайтон. Версия 22B от другого. . .
|
Einstein@Home сегодня исполняется двадцать лет!
Programma_Boinc 09.03.2025
Einstein@Home сегодня исполняется двадцать лет!
Отправлено 19 февраля 2025 года в 17:20:21 UTC
Я хочу поздравить всех наших волонтеров, разработчиков и ученых из Einstein@Home.
Мы официально. . .
|
Заполнители и расширенный набор символов в C++26
NullReferenced 09.03.2025
C++26 представляет два важных обновления: заполнители и расширенный набор символов. Заполнители (placeholders) решают давнюю проблему лаконичности кода в шаблонных выражениях и лямбда-функциях. Они. . .
|
Контракты в C++26
NullReferenced 09.03.2025
Контракты – это механизм, позволяющий указывать предусловия, постусловия и инварианты для функций в коде. Эта функциональность должна была стать частью C++20, но была исключена на встрече комитета. . .
|