![]() |
|
Другие темы раздела | |
Pascal ABC Процедура delete
https://www.cyberforum.ru/ pascalabc/ thread2335161.html Есть записи , есть 2 файла я должен ввести имя товара и сначала нужно перекинуть товар в файл g , а потом вернуть f . Procedure delete(var f:base,g:base,s:srring); Writeln('Название товара'); readln(s); ... Как это осуществить ? |
Глюк в генераторе СЧ Pascal ABC Работаю с программой, ищущей глобальный минимум среди миллионов минимумов локальных. Программа формирует случайный вектор и шагает им из текущего минимума. Заметил странный ляп. Программа находит с десяток минимумов, а потом ничего не находит долгое время. Между тем, если её остановить и запустить заново, то новые минимумы тут же находятся. Применял randomize, программно закрывал и вновь... |
Pascal ABC Односвязный список: удалить k-й элемент и вставить m элементов в конец Необходимо создать односвязный список с полями ФИО, дата рождения, ЗП удалить к-й элемент и вставить м элементов в конец. https://www.cyberforum.ru/ pascalabc/ thread2334888.html |
Pascal ABC Вычислить сумму и количество положительных элементов массива
https://www.cyberforum.ru/ pascalabc/ thread2334867.html Вычислить сумму и количество положительных элементов массива X(n), где 1<=n<=100 Буду очень признателен |
Найти все четырехзначные числа, в записи которых есть хотя бы одна цифра 4. Определите их количество Pascal ABC 1. Задача . Найти все четырехзначные числа, в записи которых есть хотя бы одна цифра 4. Определите их количество. В тетради : блок - схема , программа, ответ- количество |
Pascal ABC Написать программу, которая распечатывает все буквы, которых нет в введенной строке Помогите, если можете https://www.cyberforum.ru/ pascalabc/ thread2334392.html |
Pascal ABC Необычное уравнение
https://www.cyberforum.ru/ pascalabc/ thread2334373.html Помогите решить уравнение (№16), буду очень благодарен! |
Найти в массиве наиболее повторяющийся элемент и подсчитать количество его повторений Pascal ABC Задача звучит так. Введите массив символов из 11 элементов. Определить самый часто встречающийся символ и количество его повторений. program lab6_z2;{$APPTYPE CONSOLE} uses System,Windows,Math; const n=11; Var A:array of char; i:integer; begin |
Pascal ABC Возведение в степень Возведение в степень По трем натуральным числам a, b и m вычислить значение a в степени b mod m. Входные данные Три натуральных числа a, b, m (1 ≤ a, m ≤ 109, 2 ≤ b ≤ 107). Выходные данные Вывести ab mod m. https://www.cyberforum.ru/ pascalabc/ thread2334214.html |
Pascal ABC Вывести по номеру цеха фамилию и зарплату
https://www.cyberforum.ru/ pascalabc/ thread2333975.html Нужно при вводе номера цеха с клавиатуры, вывести фамилию человека и его зарплату, не могу понять как сделать вывод const num=3; type rec=record fam,ceh:string; zar,otp:real; end; mas=array of rec; |
Быстрое возведение в степень Pascal ABC Вычислите AB mod M (A,B,M ≤ 1018). |
Pascal ABC Программа по удалению 1-й буквы в каждом слове что в type и Var не так ввёл? вроде всё верно, а он зараза при запуске ошибку выдаёт, что-то не нравится ему при сравнении длины исходной строки с единицей, const R=20; type Lenght=1..R; Var st_isx,st_rez,slovo:String; i,k:Byte; begin Write('введите текст 20 символов:'); https://www.cyberforum.ru/ pascalabc/ thread2333520.html |
0 / 0 / 0
Регистрация: 16.10.2018
Сообщений: 1
|
|
0 | |
Подсчитать кол-во квадратных зданий на карте, если известно, что никакие два здания не касаются - Pascal ABC - Ответ 1297548216.10.2018, 17:02. Показов 862. Ответов 1
Метки (Все метки)
Дана карта местности, на которой изображены задания. Карта разбита на клетки. Массив клеток состоит из N строк и M столбцов. если клетка принадлежит зданию, то в исходном массиве ей соответствует 1, иначе 0. Все здания прямоугольной формы со сторонами, параллельными сторонам карты. Подсчитать кол-во квадратных зданий на карте, если известно, что никакие два здания не касаются (нет общих точек), и никакое здание не касается границы карты. Здания из 1-й клетки считать квадратными. 3<=N<=1000, 3<=M<=1000
Формат входных данных N M Размер карты x11 x12 ... x1M массив клеток со зданиями ... xN1 xN2 ... xNM Формат выходных данных K Количество зданий Пример входных и выводных данных Входные данные 6 8 00000000 3 01101010 01100000 01100110 01100110 00000000 Выходные данные 3 Вернуться к обсуждению: Подсчитать кол-во квадратных зданий на карте, если известно, что никакие два здания не касаются Pascal ABC
0
|
|
16.10.2018, 17:02 | |
Готовые ответы и решения:
1
Известно, что никакие два участника не набрали одинаковое количество баллов. По информации о результатах первого тура по Известно, что среди элементов матрицы два и только два равны между собой: найти их
|
16.10.2018, 17:02 | |
Помогаю со студенческими работами здесь
0
Известно, что среди элементов массива два и только два равны между собой. Напечатать их индексы
|