Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Найти трехзначные числа, которые при делении на 47 дают в остатке 43 https://www.cyberforum.ru/ turbo-pascal/ thread389447.html
Составить программу поиска трехзначных чисел, которые при делении на 47 дают в остатке 43, а при делении на 43 дают в остатке 47
Turbo Pascal Определить, является ли целая квадратная матрица 9-го порядка магическим квадратом
1. Таблица футбольного чемпионата, в котором участвовало n команд, задана своей верхней правой частью(треугольный вид ) в виде последовательности чисел 0, 1 или 3: первые n-1 чисел последовательности относятся к первой строке таблицы, следующие n-2 чисел - ко второй и т.д. Построить таблицу целиком, т.е. получить соответствующую квадратную матрицу порядка n(элементы главной диагонали заполняются...
Turbo Pascal Двумерный массив, строки палиндромы Дано цилочисленну квадратную матрицу порядка n. Найти номера тех рядков, елементи которых утворюють симетричну последовность ( полиндроми ) Как вывести даную програму через PROCEDURE либо FUNCTION ? Помогите кому не лень буду очень благодарен... https://www.cyberforum.ru/ turbo-pascal/ thread389428.html Turbo Pascal Ошибки в БД https://www.cyberforum.ru/ turbo-pascal/ thread389423.html
Если не затруднит, просмотрите, пожалуйста. Выдает бесконечные ошибки uses crt; Type link = ^kom; kom = record predpr:string; sobst: string; otrasl: string; produkt:string; sved:string;
Turbo Pascal написать программу (ввод из файла, файл можно создать в паскале)
имеются следующие сведения о абитуриентах: номер в списке, ФИО, сумма набранных баллов на вступительных экзаменах. Требуется напечатать список абитуриентов в порядке убывания суммы набранных баллов.
Turbo Pascal Array and String 1) Даны два числа k1 и k2 и матрица размера 4 x 10. Поменять местами строки1|столбцы2 матрицы с номерами k1 и k2. 2) Дана строка S, изображающая вещественное число в формате с плавающей точкой, и целое число N (> 0). Вывести набор символов, изображающих первые N цифр дробной части этого вещественного числа (без округления). Буду очень признателен... заранее спасибо https://www.cyberforum.ru/ turbo-pascal/ thread389412.html
Turbo Pascal Отсортировать каждую строку матрицы по возрастанию https://www.cyberforum.ru/ turbo-pascal/ thread389393.html
Можите кто-нибудь помочь решить? Срочно нада на завтра!!! Дана матрица целых чисел размером 4*3. Отсортировать каждую строку матрицы по возрастанию. Вывести содержимое матрицы до обработки и после обработки. Заранее спасибо!
Turbo Pascal Рекурсия 2 задачи
Вывести на экран с помощью рекурсии(ЧТОБЫ БЫЛО ПО-СЕРЕДИНЕ!!!) 111111111111111111 2222222222222 33333333 4444 33333333 2222222222222 111111111111111111
Turbo Pascal Олимпиадная задача. Помогите пожалуйста с задачей,очень срочно нужно. Задача. В список, состоящий из кодов разделительных символов, вставить (произвольно) коды ниболее часто используемых псевдографическх символов (количество символов выбрать самостоятельно). https://www.cyberforum.ru/ turbo-pascal/ thread389382.html Turbo Pascal задача в Паскаль(( ребяяята помогите плииииииииз((( В данном преедложении указать слово, в котором доля гласных (A,E,I,O,U-строчных или прописных) максимальна. вот решите пожалуйста)))))) https://www.cyberforum.ru/ turbo-pascal/ thread389362.html
работа со строками Turbo Pascal
всем привет, помогите мне пожалуйста решить программы от начало до конца, заранее спасибо. 1. Дана строка символов. Найти сколько в ней чисел. Число может состоять из нескольких цифр (максимально цифр 2). 2. Дана строка символов. Ввод строки заканчивается после набора буквы «А». Зашифровать строку символов, поменяв соседние буквы местами.
Turbo Pascal Определить max и min элемент матрицы https://www.cyberforum.ru/ turbo-pascal/ thread389349.html
Помогите пожалуйста сделать задачу: Матрица из цел. чисел(5x3). Определить max и min элемент матрицы. Результат вывести на экран.
13 / 13 / 13
Регистрация: 20.06.2011
Сообщений: 82
04.12.2011, 19:47 0

Определить сколько раз в последовательности встречается минимальное - Turbo Pascal - Ответ 2246831

04.12.2011, 19:47. Показов 2184. Ответов 8
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var s:array [1 .. 999] of integer;
n,f,i,min:integer;
begin
clrscr;
write ('vvedite kol-vo chisel n= ');
readln(n);
for i:=1 to n do begin write('vvedite ',i,' chislo = ');readln(s[i]);end;
min:=s[1];
for i :=1 to n do begin if s[i]<min then min:=s[i];end;
write('minimalnii element - ',min,' vstrechaetsya ' );
for i:=1 to n do if s[i]=min then f:=f+1 ;
writeln(F,'raz');
repeat until keypressed;
end.


Вернуться к обсуждению:
Определить сколько раз в последовательности встречается минимальное Turbo Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.12.2011, 19:47
Готовые ответы и решения:

Определить, сколько раз среди последовательности целых чисел встречается максимальное и минимальное
Даны целые числа s1,s2...sn. Определить: а) Сколько раз среди них встречается максимальное. б)...

Определить сколько раз в числе встречается 2
Определить сколько раз в числе встречается 2

Определить, сколько раз массив M2 встречается в M1
Дан массив целых чисел M1. Вводим массив M2, размер которого значительно меньше, чем у M1. ...

Определить сколько раз встречается слог в тексте
Определить сколько раз встречается слог в тексте, очень прошу помогите, за раннее спасибо!

8
04.12.2011, 19:47
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.12.2011, 19:47
Помогаю со студенческими работами здесь

Определить, сколько раз в тексте встречается буква 'о'
С клавиатуры вводится текст из маленьких русских букв. Текст заканчивается точкой. Определить,...

Определить, сколько раз встречается слово в предложении
задача: Текст. A story a story is a book written and is ilustrated, bla lbablbalbalbalbla....

Определить, сколько раз в числе встречается цифра а
Дано натуральное число. Определить: •сколько раз в нем встречается цифра а; •сколько раз в нем...

Определить, сколько раз в строке встречается символ 'A'
Программа, которая определит сколько раз встречается в строке символ 'A'; Помогите пожалуйста...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru