![]() |
|
Другие темы раздела | |
PascalABC.NET Цикл: Написать программу нахождения суммы первых k слагаемых... Написать программу нахождения суммы первых k слагаемых. Спецификация ввода: k x Спецификация вывода: значение суммы https://www.cyberforum.ru/ pascalabc-net/ thread2336166.html |
PascalABC.NET Нужно довести программу до ума помогите с кодом. uses crt { uses список использумых модулей,библиотека}{cathod ray tube модуль для работы с текстовой информацией на дисплее,клавиатуре}; const m=255;{Раздел для объявления констант. Константы - почти как переменные, но их значения нельзя поменять во время работы программы. } type{type используется при создании пользовательских типов данных,РАЗДЕЛОВ ТИПОВ} machina=record... |
PascalABC.NET Вывести на экран N наименьших натуральных нечетных чисел N нечетных чисел Нужно вывести на экран N наименьших натуральных нечетных чисел. Input Со стандартного устройства ввода вводится 1 натуральное число – N (1 ≤ N ≤ 300). Output Нужно выдать на стандартное устройство вывода N требуемых чисел в порядке возрастания через пробел. В конце строки пробел ставить не следует. https://www.cyberforum.ru/ pascalabc-net/ thread2335988.html | PascalABC.NET Добавить процедуры в программу var ucxod_tekct,Key,ZanomuH_Key:string; Ucx_Mas,matrix:array of char; dlina_KEy,Kolvo_ctrok,i,j,k:byte; Zapomin:char; f:text; begin ucxod_tekct:='ваш текст '; key:='123456';//ключ мой(колво столбцов) zanomuH_Key:=key;//запомним его dlina_KEy:=6;//длина ключа=количество столбцов матрицы https://www.cyberforum.ru/ pascalabc-net/ thread2335982.html |
PascalABC.NET График функции Что исправить нужно graphABC; //Подключаем графический модуль const W = 1200; H = 500;//Размеры графического окна function F(x: real): real; begin if (x>=3) and (x<6) then F:= sqrt(3-sqr(x-6)); //Функции |
PascalABC.NET Вывести на экран все трехзначные числа, сумма цифр которых равна N
https://www.cyberforum.ru/ pascalabc-net/ thread2335963.html Я решил 3 задачи из олимпиады, вот заканчиваю задачку. Подскажите что не так? Условие:Вывести на экран все трехзначные числа, сумма цифр которых равна N. Пытаться перебирать все трехзначные числа от 100 до 999, затем каким-то образом делением и вычитанием выделять отдельные цифры, искать их сумму, сравнивать с N достаточно сложно. Исходя из того, что трехзначное число состоит из 3 цифр, причем... |
PascalABC.NET Проверить мою Олимпиаду
https://www.cyberforum.ru/ pascalabc-net/ thread2335961.html Всем добрый день, у меня заданно 5 задач я в 9 классе там 2 из 10-11 + там всего 2 на темы которые мы учили. Я вот что смог решить, посмотрите и помогите исправить если я ошибся) 1. program one; uses CRT; var i, sum: integer; begin |
Нужно разбить программу на 2 программы PascalABC.NET нужно разбить программу на 2 программы- 1:шифрование текста, а 2: расшифровка зашифрованного сообщенияvar ucxod_tekct,Key,ZanomuH_Key:string; Ucx_Mas,matrix:array of char; dlina_KEy,Kolvo_ctrok,i,j,k:byte; Zapomin:char; f:text; begin ucxod_tekct:='ваш текст '; key:='123456';//ключ мой(колво столбцов) zanomuH_Key:=key;//запомним его dlina_KEy:=6;//длина ключа=количество... |
PascalABC.NET График В чем ошибка? uses graphABC; //Подключаем графический модуль const W = 1200; H = 500;//Размеры графического окна function F(x: real): real; begin if (x>-10) and (x<0) then F:=((-x-6)/2); if (x>3) and (x<6) then F:=(sqrt(sqr(3)-sqr(x))); https://www.cyberforum.ru/ pascalabc-net/ thread2335886.html |
PascalABC.NET Реализовать шифрование и дешифрование методом Простой перестановки
https://www.cyberforum.ru/ pascalabc-net/ thread2335813.html Реализовать шифрование и дешифрование методом Простой перестановки (Строк-6,столбцов-7) Шифровать и расшифровывать любой текст |
ИИ в паскале PascalABC.NET Всем привет. Создаю простенькую игру в паскале с ботами (стрелялка). Не понимаю, как сделать, чтобы когда игрок встанет на путь бота - бот начнёт стрелять. type bot = class private x, y: integer; angle: boolean; // Направление. true - лево, false - право pict: GraphABC.Picture; public function IsPlayerHere(): boolean; |
PascalABC.NET Программирование алгоритмов циклической структуры с заданным числом повтрений
https://www.cyberforum.ru/ pascalabc-net/ thread2335609.html Помогите, пожалуйста, совсем не понимаю ничего. Почему показывает NaN? |
0 / 0 / 0
Регистрация: 18.10.2018
Сообщений: 2
|
|
0 | |
GraphABC Химия Pascal ABC - PascalABC.NET - Ответ 1297980018.10.2018, 09:02. Показов 900. Ответов 1
Метки (Все метки)
0
|
|
18.10.2018, 09:02 | |
Готовые ответы и решения:
1
Можно как-то переделать код из Turbo Pascal чтобы он работал в pascal abc.net? Перевод программы с Turbo Pascal на Pascal ABC.NET |
18.10.2018, 09:02 | |
18.10.2018, 09:02 | |
Помогаю со студенческими работами здесь
0
Нужно переделать программу,написанную на Turbo Pascal в ту,чтобы работала на Pascal ABC.NET пожалуйста Нужно переделать программу,написанную на Turbo Pascal в ту,чтобы работала на Pascal ABC.NET пожалуйста Перевод программы с turbo pascal на Pascal ABC
|