|
|
| Другие темы раздела | |
|
Pascal Нарисовать стол 1-коричневый 2-серый з-чорный цвет фона-белый цвет линии-чорный uses graph; var x,y:integer; begin initgraph(x,y,''); x:=getmaxX div 2; y:=getmaxY div 2; setfillstyle(1,15); bar(0,0,getmaxX,getmaxY); setlinestyle(0,0,3); setcolor(0); |
Pascal Все отрицательные значения вещественного массива переместить в его начало
https://www.cyberforum.ru/ pascal/ thread1206635.html Написать рекурсивную подпрограмму,которая все отрицательные значения вещественного массива перемещает в его начало. Массивы и циклы не использовать Помогите, пожалуйста которая все отрицательные значения вещественного массива Массивы и циклы не использовать Это два взаимоисключающих условия! |
|
Pascal Факторизация чисел <=1*10^9 быстрее, чем за 1 секунду В общем - сабж Есть два числа n и m Вот мой алгоритм факторизации (попутно засовывая их в массивы) j:=1; i:=2; k:=1; while ((n<>1) or (m<>1) ) do begin 1: if n mod i = 0... |
Pascal В каждом слове поменять буквы (задом наперед), все слова расположить в обратной последовательности Дан текстовый файл, в каждом слове поменять буквы (задом на перед), все слова расположить в обратной последовательности, а знаки препинания оставить на своих позициях. Помогите, пожалуйста, кому... Намедни решал подобную задачу. Более упрощенный вариант - "в каждом слове поменять буквы (задом на перед), все слова расположить в обратной последовательности". Если устроит, текст программы выложу. https://www.cyberforum.ru/ pascal/ thread1207184.html |
| Pascal Вычислить значение выражения Составить программу, находящую значение x=rem(rem(A,B),rem(C,D)), где A, B, C, D – натуральные числа, а функция rem возвращает в результате остаток от деления. Целочисленное деление при задании... var x,a,b,c,d:integer; function rem(a,b:integer):integer; var i:integer; begin if a<b then rem:=a else https://www.cyberforum.ru/ pascal/ thread1207079.html |
Pascal Определить фамилии женатых (замужних) людей, имеющих детей Известны фамилии 25-ти человек, их семейное положение:женат(замужем) или нет, и сведения о наличии детей(есть или нет). Определить фамилии женатых(замужних) людей имеющих детей. {Известны фамилии 25-ти человек, их семейное положение:женат(замужем) или нет, и сведения о наличии детей(есть или нет). Определить фамилии женатых(замужних) людей имеющих детей.} uses ... |
| Pascal Найти в файле f все слова, которые представляют числа (в десятичной записи) Найти в файле f все слова, которые представляют числа (в десятичному записи) и получить числовой файл (структурного типа) q, содержащий найдены числа. uses crt; var f:file of string; q:file of integer; s:string; n,i,a:integer; begin assign(f,'slova'); rewrite(f); assign(q,'chisla'); rewrite(q); https://www.cyberforum.ru/ pascal/ thread1206818.html |
Pascal Подсчитать сумму всех отрицательных элементов матрицы
https://www.cyberforum.ru/ pascal/ thread1206654.html Отобразить в виде Pascal-програмы и написать блок-схему алгоритм расчёта суммы, всех отрицательных элементов матрицы HP{m=3,n=5}, если таковые в ней имеются Const n=3;m=5; Var A:array of real; i,j:byte; s:real; Begin For i:=1 to n do Begin For j:=1 to m do Begin A:=random*10-5; |
|
Pascal Даны два файла (структурного типа) f1 и f2. Составить файл q из слов, которые встречаются и в f1, и в f2
https://www.cyberforum.ru/ pascal/ thread1206819.html Даны два файла (структурного типа) f1 и f2. Составить файл q из слов, которые встречаются и в f1, и в f2. |
Pascal Слова в строке разделены пробелами. Найти симметричное слово и поменять его со словом стоящим на 3ем месте дана строка, слова отделены пробелом. нужно найти симметричное слово и поменять его со словом стоящим на 3ем месте. помогите написать задачу и , если можно , с небольшими объяснениями, хочу... https://www.cyberforum.ru/ pascal/ thread1206669.html |
|
Pascal Найти произведение только тех чисел, которые больше заданного числа М
https://www.cyberforum.ru/ pascal/ thread1207228.html Дана последовательность целых положительных чисел. Найти произведение только тех чисел, которые больше заданного числа М. Если таких нет, то выдать сообщение об этом. //Дана последовательность целых положительных чисел. //Найти произведение только тех чисел, которые больше заданного числа М. // Если таких нет, то выдать сообщение об этом. program proizv; uses... |
Сохранить элементы матрицы вещественных чисел в текстовом файле Pascal Сохранить элементы матрицы вещественных чисел в текстовом файле с такой структурой: • первая строка файла содержит два числа n и m, разделенных пробелом - соответственно количество строк и ... Const nmax=20; Var A:array of real; i,j,n,m:byte; f:text; Begin Repeat write('Количество строк 1<=N<=',nmax,': ');readln(n); Until n in ; Repeat ... |
0 / 0 / 0
Регистрация: 12.06.2014
Сообщений: 32
|
|
| 15.06.2014, 23:18 [ТС] | 0 |
Перевод из С++ в Паскаль.Записать в выходной файл построчно все ключевые слова, встречающиеся в этой программе - Pascal - Ответ 632262215.06.2014, 23:18. Показов 650. Ответов 1
Метки (Все метки)
Ответ
неактуально
Вернуться к обсуждению: Перевод из С++ в Паскаль.Записать в выходной файл построчно все ключевые слова, встречающиеся в этой программе Pascal
0
|
|
| 15.06.2014, 23:18 | |
|
Готовые ответы и решения:
1
Записать в выходной файл в алфавитном порядке построчно все идентификаторы, встречающиеся в этой программе Записать в файл все ключевые слова, встречающиеся в программе, указав количество появлений ключевого слова |
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
| 15.06.2014, 23:18 | |
|
Помогаю со студенческими работами здесь
0
построчно все ключевые слова Найти и записать в выходной файл все симметричные слова Записать в выходной файл все слова начинающиеся с буквы заданной пользователем
|
Новые блоги и статьи
|
||||
|
Простая нейросеть на КуМир: Создание и обучение
EggHead 16.03.2025
Искусственные нейронные сети — удивительная технология, позволяющая компьютерам имитировать работу человеческого мозга. Если вы хотя бы немного интересуетесь современными технологиями, то наверняка. . .
|
Исполнитель Кузнечик в КуМир: Решение задач
EggHead 16.03.2025
Среди множества исполнителей в системе КуМир особое место занимает Кузнечик — простой, но невероятно полезный виртуальный персонаж, который перемещается по числовой прямой, выполняя ваши команды. На. . .
|
Исполнитель Водолей в КуМир: Решение задач
EggHead 16.03.2025
Разработка алгоритмического мышления — одна из ключевых задач для начинающих программистов, и система КуМир предлагает отличный способ погрузиться в этот процесс. Среди множества исполнителей в этой. . .
|
Исполнитель Чертежник в КуМир: Решение задач
EggHead 16.03.2025
Представьте, что вы можете рисовать на бесконечной координатной плоскости, перемещая точку, которая оставляет след. По вашей команде она может поднять перо и двигаться, не оставляя следа, или. . .
|
Исполнитель Робот в КуМир: Решение задач
EggHead 16.03.2025
КуМир (Комплект Учебных МИРов) — это учебная среда программирования, разработанная специально для обучения базовым концепциям алгоритмизации. Её главная фишка — использование русскоязычного. . .
|
|
Исполнитель Черепаха в КуМир: Решение задач
EggHead 16.03.2025
Представьте, что вы впервые учитесь программировать, а перед вами стоит задача заставить маленькую виртуальную черепашку рисовать на экране. Звучит забавно? Эта идея зародилась ещё в 1967 году, когда. . .
|
Конвейеры данных с Apache Kafka
Javaican 16.03.2025
В мире, где данные стали новой нефтью, Apache Kafka зарекомендовал себя как мощный инструмент для построения надежных и масштабируемых конвейеров данных. Созданный изначально командой LinkedIn в 2011. . .
|
Deno против Node.js: Будущее JavaScript рантайма
run.dev 16.03.2025
За последнее десятилетие Node. js стал абсолютным лидером среди JavaScript-рантаймов и фактическим стандартом для серверной разработки на JavaScript. Но в 2018 году тот же разработчик, который создал. . .
|
SwiftUI или UIKit - что выбрать для нового приложения iOS?
mobDevWorks 16.03.2025
Когда Apple представила SwiftUI на WWDC 2019, многим показалось, что дни UIKit сочтены. Новый декларативный фреймворк предлагал радикально иной подход к разработке интерфейсов. Вместо кропотливого. . .
|
Docker: Руководство для начинающих по созданию первого приложения
Mr. Docker 16.03.2025
Docker — это платформа, которая упаковывает ваше приложение и все его зависимости в стандартизированные блоки, называемые контейнерами. Эти контейнеры изолированы друг от друга и от основной системы,. . .
|
Наверх