|
|
| Другие темы раздела | |
| Pascal ABC Сформировать структуру данных очередь, элементы которой содержат сведения о времени пребывания i-го покупателя У прилавка в магазине выстроилась очередь из покупателей (максимальное количество 30). Время обслуживания продавцом i-го покупателя задано случайно, и изменяется в диапазоне от 5 до 15 минут. Сформировать структуру данных очередь, элементы которой содержат сведения о времени пребывания i-го покупателя в очереди. Указать номер покупателя, для обслуживания которого продавцу потребовалось самое... https://www.cyberforum.ru/ pascalabc/ thread1744318.html |
Удалить из стека все элементы, кратные 5 Pascal ABC Создать динамическую структуру – стек, содержащий максимально 50 случайных целочисленных элементов. Упорядочить элементы стека по убыванию. Удалить из стека все элементы, кратные 5. Затем оставшиеся элементы переписать в два стека: в первый четные значения, во второй – нечетные с сохранением относительного порядка их следования. |
|
Pascal ABC Переставить местами первую и последнюю цифры этого числа
https://www.cyberforum.ru/ pascalabc/ thread1744313.html Дано натурально число n. Переставить местами первую и последнюю цифры этого числа. В программе использовать любой цикл |
Pascal ABC Найти сумму первой и последней цифры числа Дано натуральное число n. Найти сумму первой и последней цифры этого числа. В программе использовать case https://www.cyberforum.ru/ pascalabc/ thread1744312.html |
|
Pascal ABC Заменить в файле все элементы, равные lit, на пробел Люди добрые помогите пожалуйста) Задан текстовой файл и некоторая литера lit. Написать программу, которая заменяет в файле все элементы, равные lit, на пробел. есть кое-какие наработки, Program lab08; Var f:file of char; s:char; i:integer; m:string; |
Pascal ABC Операция 'and' не применима к типу KeyValuePair<real,integer> Показывает ошибку "Операция 'and' не применима к типу KeyValuePair<real,integer>" VAR X, X1, Y1, Y : REAL; begin WRITELN ( ‘ВВЕДИ X:’); READLN (X); Y:= EXP ((-X+1)*LN (3) ) * SIN (X); WRITELN (‘ При Х=’, X: 8:3, ‘Y=’, Y: 8:4); WRITELN (‘ Y11=’, TRUNC (Y): 4, ‘Y22=’, ROUND (Y): 4); WRITELN (‘ВВЕДИ КООРДИНАТЫ: Х1, Y1’); https://www.cyberforum.ru/ pascalabc/ thread1744082.html |
|
Pascal ABC Найти максимальные элементы в каждом столбце матрицы и записать их в последнюю строку матрицы
https://www.cyberforum.ru/ pascalabc/ thread1744053.html C клавиатуры вводится матрица n*m 1.найти максимальные элементы в каждом столбце матрицы и записать их в последнюю строку матрицы . 2.найти сумму чисел кратным трем в каждой строке матрицы и записать эту сумму в последний столбец . 3.с клавиатуры вводится номер столбца упорядочить по убыванию элементы в этом столбце. |
Pascal ABC Получить гистограмму длин строк файла Заданный текстовый файл. Получить гистограмму длин строк этого файла. вот что мне удалось написать. program fajly; var f:text; a:array of string; len:array of integer; max,i,n,m,j:integer; begin assign(f,'f.txt'); rewrite(f); readln(n); close(f); reset(f); |
| Pascal ABC Найти сумму элементов главной диагонали матрицы Дан двумерный массив n*m. Найти сумму элементов главной диагонали при n=m. https://www.cyberforum.ru/ pascalabc/ thread1743870.html |
Pascal ABC Написать программу, которая находит максимальное значение и умножает его на минимальное значение
https://www.cyberforum.ru/ pascalabc/ thread1743869.html Дан двумерный массив, размером n*m. Написать программу, которая находит максимальное значение и умножает его на минимальное значение. |
|
Pascal ABC Составить программу, которая находит сумму четных элементов массива Дан двумерный массив от 1 до n. Составить программу ,которая находит сумму четных элементов массива. |
Pascal ABC Найти количество согласных букв предложения В входном файле записано предложение. Вывести в выходной файл построчно следующие результаты количество согласных букв, самое длинное слово, сумму нечетных цифр, сумму чисел, все слова палиндромы, напечатать все символы встречающиеся в тексте только один раз https://www.cyberforum.ru/ pascalabc/ thread1743830.html |
|
0 / 0 / 0
Регистрация: 20.12.2015
Сообщений: 23
|
|
| 0 | |
Вывести фамилии сотрудников, номера телефонов, которые начинаются с цифр 361,362 или 273 - Pascal ABC - Ответ 918380324.05.2016, 18:00. Показов 1062. Ответов 0
Метки (Все метки)
Вернуться к обсуждению: Вывести фамилии сотрудников, номера телефонов, которые начинаются с цифр 361,362 или 273 Pascal ABC
0
|
|
|
|
| 24.05.2016, 18:00 | |
|
Готовые ответы и решения:
0
Дан файл Т, который содержит номера телефонов сотрудников учреждения Сформировать текстовый файл, который содержит номера телефонов сотрудников учреждения |
| 24.05.2016, 18:00 | |
| 24.05.2016, 18:00 | |
|
Помогаю со студенческими работами здесь
0
Найти список телефонов сотрудников, чьи фамилии начинаются с заданной буквы |