|
|
| Другие темы раздела | ||||||||||||||||||
| Pascal ABC Считать массив string Здравствуйте! Нужно прочитать массив из строковых данных,если имееться пробел (который разделяет строки массива),начать читать следующую строку... Вот моя часть кода: fail:='`'; read(real); if fail = real then goto failend else if real <> fail then n:=i else goto mark; Проблема в том, разделён пробеллами массив или нет собирает все строки в 1. Подскажите как... https://www.cyberforum.ru/ pascalabc/ thread1523274.html |
Pascal ABC Напечатайте 20 случайных чисел в диапазоне от 1 до 50 так, чтобы каждое число встретилось в распечатке 1 раз Напечатайте 20 случайных чисел в диапазоне от 1 до 50 так, чтобы каждое число встретилось в распечатке лишь по разу. Подсказка: после генерации числа функцией Random проверьте его на вхождение в множество уже напечатанных чисел. | |||||||||||||||||
| Pascal ABC Определить какой-либо корень уравнения с точностью до ε=0.001 методом табулирования 1. Определить какой-либо корень уравнения f(x)=√5 e^(-2x) cos(17x+√π)=0 с точностью до ε=0.001 методом табулирования, Помогите пожалуйста написать программу. в задании не указан шаг. Заранее всем спасибо https://www.cyberforum.ru/ pascalabc/ thread1521988.html | Pascal ABC Чтение словаря из файла и запись в вектор в ОЗУ Друзья хотя мой вопрос из паскаль но думаю если вы знайте другие языки программирование то наверно будете знать. Вопрос такой. { У меня есть текстовой файл, где написан словарь (каждая строка-1 слова). Надо записать словарь в оперативной памяти в новом векторе (массиве) в таком очереди, чтоб каждая новая слова начинается с предыдущий последной буквы. Если такая сова выбирать не можно, то выбрать... https://www.cyberforum.ru/ pascalabc/ thread1521804.html | |||||||||||||||||
|
Pascal ABC Объединить 3 программы в 1 Объеденить 3 программы в 1, и создать к ней меню с выбором пункта программы. 1. Условие: Дан двумерный массив размерностью 4х5, заполненный целыми числами с клавиатуры. Сформировать одномерный массив, каждый элемент которого равен количеству отрицательных элементов, кратных 3 или 5, соответствующей строки; Var x: Array of integer; b: Array of integer; i,j,k: Integer; BEGIN ... |
Pascal ABC Написать программу, которая удаляет из строки все группы, заканчивающиеся на 10 Строка вводится с клавиатуры. После выводится измененная. Программу вроде написал, но работает некорректно. program abc; var str,output, buf: shortstring; i,n: byte; w: boolean; begin readln (str); https://www.cyberforum.ru/ pascalabc/ thread1518868.html | |||||||||||||||||
|
Pascal ABC Исправить программу вычисления значения выражения
https://www.cyberforum.ru/ pascalabc/ thread1517877.html Вычислить значение выражения P=\frac{a-2b}{x\,e^{(-sin^2\,a\,x)}}-\sqrt{\left|12+b^3x \right|^3} Входные данные: Выходные данные: Во входном потоке задано три вещественных числа a (a > 0), b (b < 0), x (-1 < x < 1). Значения исходных данных подобраны так, что выражение имеет смысл. В выходной поток вывести единственное вещественное число с точностью три знака после запятой. Пример... |
Процедура распечатки месяца, представленного в перечислении Pascal ABC Процедура печати Writeln не способна распечатать название месяца, представленного в перечислении. Напишите для этого свою собственную процедуру (объявите тип TMonth и воспользуйтесь оператором CASE). Вот моя попытка- бред: Type Tmonth = (jan,febr,mar,apr,may,jun,iyul,aug,sen,oct,noy,dek); function noob(a:string):Tmonth; Begin | |||||||||||||||||
|
Pascal ABC Заменить нечетные члены массива на 2^k превышающие этот член
https://www.cyberforum.ru/ pascalabc/ thread1517711.html С использованием процедуры И функции (процедура содержится в модуле, а функция в основной программе). Выдаёт ошибку, не знаю как исправить. Код: program abc; uses tinton; type mas=array of real; var n,i,k:integer; a:mas; z:real; function bystep (z:real;k:integer):integer; |
Pascal ABC Создать графический интерфейс меню как создать графический интерфейс меню в одном программном модуле, который вызывал бы другие программные модули. https://www.cyberforum.ru/ pascalabc/ thread1516710.html | |||||||||||||||||
|
Текстовый файл. Ошибка времени выполнение Pascal ABC Извините меня пожалуйста, но времени нету читать. Делаю с тем что есть... Условия задачи: Нужно создать текстовый файл с именем "студенты группы". В текстовом файле должны быть такие поля для заполнения: 1)... студентов группы, 2)фамилии и инициалы, 3)область проживания, 4)стать, 5)год рождения, 6) кол-во балов на екзамене, 7)....студентов указанного года рождения. |
Pascal ABC Перевод секунд в привычный вид (чч:мм:сс)
https://www.cyberforum.ru/ pascalabc/ thread1516233.html А вот и оригинал задачи: Штирлицу подарили секундомер, который показывал секунды, прошедшие с начала суток. Пусть ваша программа переведёт это число в привычные часы, минуты и секунды. Подсказки: во-первых, примените операции DIV и MOD. Во-вторых, переменную для секунд объявите как LONGINT (а не INTEGER), поскольку количество секунд в сутках (86400) не поместится в типе INTEGER.
Наверх
| |||||||||||||||||
