![]() |
|
Другие темы раздела | |
Даны натуральные числа m и n.Найти сумму и произведение их последних цифр. Pascal Даны натуральные числа m и n.Найти сумму и произведение их последних цифр. Предыдущее решение чем не устраивало? |
Упорядочить по возрастанию последовательность трех чисел X,Y,Z Pascal Помогите мне решить эти 4 задачки по Паскалю,а то не получается у меня её решить(( 1)Упорядочить по возрастанию последовательность тех чисел X,Y,Z(вывести на печать заданные числа в порядке... @Capitanjack, Множественные задания в одной теме запрещены правилами форума. Для каждой задачи создавайте отдельную тему. Ваши остальные задачи: https://www.cyberforum.ru/pascal/thread913372.html... |
Pascal Файлы: cчитaть cнaчaлa вcе элементы c нечетными нoмерaми пoзиций, a пoтoм – c четными нoмерaми нaпишите прoгрaммy, зaнocящyю в фaйл 8 целыx чиcел, введенныx c клaвиaтyры. cчитaть и вывеcти нa экрaн cнaчaлa вcе элементы c нечетными нoмерaми пoзиций в фaйле, a пoтoм – c четными нoмерaми. Вывеcти... Var f: File of Integer; i: Byte; x: Integer; BEGIN Assign(f,'1.dat'); Rewrite(f); Writeln('Введите 8 чисел в файл:'); For i:=1 to 8 do begin https://www.cyberforum.ru/ pascal/ thread913692.html |
Нахождение максимального элемента массива Pascal создать программу с прoцедyрой для ввoдa мaccивa из N вещеcтвенныx чиcел. Ввеcти двa мaccивa: из 5 и 8 чиcел. Для кaждoгo мaccивa нaйти мaкcимaльный элемент и вывеcти егo знaчение нa экрaн. program ConsoleApp; procedure ReadArr(var a: array of Double; n: Integer); var i: Integer; begin Dec(n); for i:= 0 to n do ReadLn(a); end; |
Найти сумму и произведение последних цифр чисел Pascal Помогите мне решить эти 4 задачки по Паскалю,а то не получается у меня её решить(( 3)Даны натуральные числа m и n.Найти сумму и произведение их последних цифр. var m,n,s,p:integer; begin write ('M = '); readln(m); write ('N = '); readln(n); s:=n mod 10+m mod 10; p:=(n mod 10)*(m mod 10); writeln ('Сумма: ',s); |
Pascal Найти номер «самой старшей» параллели, в которой более 120 учащихся В массиве записано общее число учащихся в каждой параллели школы (с 5 по 11 классы). Найти номер «самой старшей» параллели, в которой более 120 учащихся. const n=7; var i,x: integer; a: array of integer; begin x:=0; for i:=1 to n do begin write('Êîë-âî ó÷-ñÿ â ',i+4,'-õ êëàññàõ: '); |
Pascal Вычислить сумму членов ряда от первого до члена с наименьшим номером, не превышающего то абсолютному значению 0,01.
https://www.cyberforum.ru/ pascal/ thread913602.html Член ряда с номером n определяется выражением n/(n^3+n^2-3).Вычислить сумму членов ряда от первого до члена с наименьшим номером, не превышающего то абсолютному значению 0,01. называйте темы информативно, согласно правил форума |
Pascal Подсчитать количество четных элементов массива, расположенных между наибольшим и наименьшим элементами массива
https://www.cyberforum.ru/ pascal/ thread913372.html Помогите мне решить эти 4 задачки по Паскалю,а то не получается у меня её решить(( 2)Дан одномерный числовой массив, все элементы которого различны.Подсчитать в нем количество четных элементов,... uses crt; const n=10; var a:array of integer; min,max,i,k:integer; begin clrscr; randomize; for i:=1 to n do |
Pascal Алгоритм вычисления простых чисел нaиcaть фyнкцию, вычиcляющyю cледyющее прocтoе чиcлo пocле ее aргyментa. В ocнoвнoй прoгрaмме ввеcти 4 прocтыx чиcлa, нaйти cледyющие зa ними прocтые чиcлa. Резyльтaты вывеcти нa экрaн. uses crt; var i: byte; n: integer; function Next (c: integer): integer; var j,k: integer; begin k:=1; while k<>0 do begin https://www.cyberforum.ru/ pascal/ thread913698.html |
Pascal Найти наименьшее общее кратное двух натуральных чисел
https://www.cyberforum.ru/ pascal/ thread913799.html Надо cocтaвить прoцедyрy для нaxoждения нaименьшегo oбщегo крaтнoгo двyx нaтyрaльныx чиcел. , где нoд(a,в) нaxoдят метoдoм Евклидa. В ocнoвнoй прoгрaмме ввеcти три знaчения a,b,c, нaйти НoК для... Var a,b,c,t:integer; Procedure NoK(a,b:integer;Var nk:integer); Begin nk:=a*b; While a<>b do if a>b then a:=a-b else b:=b-a; nk:=t div a End; Begin |
Pascal Создать файл по образцу
https://www.cyberforum.ru/ pascal/ thread913729.html Ввеcти c клaвиaтyры целoе пoлoжительнoе чиcлo N. coздaть текcтoвый фaйл из N cтрoк длины N. cтрoкa c нoмерoм K (K = 1, 2, … N) дoлжнa coдержaть К нaчaльныx прoпиcныx (зaглaвныx) бyкв лaтинcкoгo... var n,i,j: byte; c: char; f: text; begin assign(f,'D:\out.txt'); rewrite(f); repeat write('n='); readln(n); until n<=26; for i:=1 to n do |
Pascal C пoмoщью функции нaйти периметр четыреxyгoльникa пo кooрдинaтaм егo вершин
https://www.cyberforum.ru/ pascal/ thread913664.html напиcaть фyнкцию, вычиcляющyю длинy oтрезкa пo кooрдинaтaм ее кoнцoв пo фoрмyле c ее пoмoщью в ocнoвнoй прoгрaмме нaйти периметр четыреxyгoльникa пo кooрдинaтaм егo вершин. Знaчения кooрдинaт... Var x1,x2,x3,x4,y1,y2,y3,y4: Integer; {--------} Function Dlina(a,b,c,d: Integer): Real; begin Dlina:=Sqrt(Sqr(c-a)+Sqr(d-b)); end; {--------} BEGIN Write('Введите координаты 1 вершины:... |
![]() 351 / 344 / 279
Регистрация: 21.05.2013
Сообщений: 1,312
|
||||||
17.07.2013, 13:43 | 0 | |||||
Разработать программу в паскале для вычисления таблицы значений модуля комплексной функции - Pascal - Ответ 485308417.07.2013, 13:43. Показов 1457. Ответов 2
Метки (Все метки)
![]() РешениеКликните здесь для просмотра всего текста
вот так или нет? точнее формулу Вернуться к обсуждению: Разработать программу в паскале для вычисления таблицы значений модуля комплексной функции Pascal
0
|
17.07.2013, 13:43 | |
Готовые ответы и решения:
2
Разработать программу вычисления таблицы значений функции Разработать программу табулирования (вычисления таблицы значений) функции |
17.07.2013, 13:43 | |
Помогаю со студенческими работами здесь
0
Разработать программу табулирования (вычисления таблицы значений) функции
Разработать алгоритм и составить программу вычисления таблицы значений функции
|
Новые блоги и статьи
![]() |
||||
Система безопасности в Laravel: возможности и примеры
Wired 18.02.2025
Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
|
Давайте сравним Django и Laravel
Wired 18.02.2025
Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .
|
Laravel или React - что лучше?
Wired 18.02.2025
В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .
|
Laravel 11: новые возможности, гайд по обновлению
Wired 18.02.2025
Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .
|
Миграции в Laravel
Wired 18.02.2025
Разработка веб-приложений на Laravel неразрывно связана с управлением структурой базы данных. При работе над проектом часто возникает необходимость вносить изменения в схему базы данных - добавлять. . .
|
Аутентификация в Laravel
Wired 18.02.2025
В современном мире веб-разработки безопасность пользовательских данных становится критически важным аспектом любого приложения. Laravel, как один из самых популярных PHP-фреймворков, предоставляет. . .
|
Laravel или Symfony: что лучше для старта?
Wired 18.02.2025
В веб-разработке выбор правильного фреймворка может стать определяющим фактором успеха проекта. Особенно это актуально для PHP - одного из самых распространенных языков программирования, где Laravel. . .
|
Что нового в Laravel 12
Wired 18.02.2025
С момента своего появления в 2011 году Laravel постоянно развивается, внедряя инновационные решения и совершенствуя существующие возможности. В начале 2025 года ожидается выход Laravel 12 - новой. . .
|
Роутер в Laravel: как работать с маршрутами
Wired 18.02.2025
Маршрутизация - один из основополагающих элементов любого веб-приложения на Laravel, определяющий как приложение отвечает на HTTP-запросы к различным URL-адресам. По сути, роутинг - это механизм. . .
|
Интеграция шаблона Bootstrap в Laravel PHP
Wired 18.02.2025
Разработка веб-приложений в современном мире требует не только надежного бэкенда, но и привлекательного, отзывчивого интерфейса. Laravel, как один из самых популярных PHP-фреймворков, отлично. . .
|