|
|
| Другие темы раздела | |||||||||||||||||
|
PascalABC.NET Для заданного натурального A найти минимальное натуральное N такое, что N в степени N делится на A...
https://www.cyberforum.ru/ pascalabc-net/ thread2339877.html Степень Ограничение времени 1 секунда Ограничение памяти 64Mb Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt Для того чтобы проверить, как ее ученики умеют считать, Мария Ивановна каждый год задает им на дом одну и ту же задачу – «Для заданного натурального A найти минимальное натуральное N такое, что N в степени N (N, умноженное на себя N раз) делится на A». Из... |
Составить программу, чтобы компьютер сгенерировал три случайных целых однозначных чисел и из них сформировал трехзначное PascalABC.NET Составить программу, чтобы компьютер сгенерировал три случайных целых однозначных чисел и из них сформировал трехзначное число, все числа вывел на экран. | ||||||||||||||||
| PascalABC.NET Запросить с клавиатуры слово и число до 10000, определить количество в них знаков, напечатать результат на экране Сделайте, если не сложно. 1.Запросить с клавиатуры слово и число до 10000, определить количество в них знаков, напечатать результат на экране. 2.Из своих фамилии и имени с помощью строковых функций получить 10 слов и вывести их на экран. 3.Составить программу, чтобы компьютер сгенерировал случайное целое трехзначное число, с помощью строковых функций определил, сколько в нем единиц, десятков и... https://www.cyberforum.ru/ pascalabc-net/ thread2339866.html |
PascalABC.NET Запросить с клавиатуры три числа, сложить их, затем определить количество знаков в сумме, напечатать результат на экране
https://www.cyberforum.ru/ pascalabc-net/ thread2339865.html Сделайте, если не сложно. 1.Запросить с клавиатуры три числа, сложить их, затем определить количество знаков в сумме, напечатать результат на экране. Остальные задания удалены. | ||||||||||||||||
|
Линейные массивы PascalABC.NET В одномерном массиве, состоящем из N вещественных элементов, вычислить: минимальный элемент массива; сумму элементов массива, расположенных после максимального элемента. Преобразовать массив таким образом, чтобы сначала располагались все элементы, равные нулю, а потом - все остальные. |
PascalABC.NET Умножить на 3 положительные элементы массива, отрицательные разделить на 2, а равные нулю – заменить числом 5
https://www.cyberforum.ru/ pascalabc-net/ thread2339823.html ПОМОГИТЕ ПОЖАЛУЙСТА С ОБЪЯСНЕНИЕ ТОЛЬКО УЧУСЬ И В ЧЕМ ОШИБКА Дан одномерный массив чисел. Умножить на 3 его положительные элементы, отрицательные разделить на 2, а равные нулю – заменить числом 5. (Реализовать задачу, используя IF.) Program abc; var mas: array of integer; i: real; begin | ||||||||||||||||
| PascalABC.NET Ответ NaN в задаче Первые 6 строчек считает нормально, а в последних двух выдает NaN. Пробовал разные проверки, но тщетно. const h=0.4; b=-2.3; c=1.2; var y,x,x1,x2,D,a:real; i:integer; begin a:=-1; writeln(' __'); writeln('| a | x1 | x2 | y |'); writeln('|__|'); https://www.cyberforum.ru/ pascalabc-net/ thread2339760.html |
Можно ли перед каждым из чисел от 1 до N расставить знаки «+» или «–» так, чтобы сумма получившихся чисел была равна 0? PascalABC.NET Решить пробовал , но это не о чем , не одного правильного вывода не было , окало часа шаманил , но голяк (только в школе циклы прошли и на тебе (1 год обучения)) Легенда гласит, что Карл Фридрих Гаусс, учась в школе, смог быстро посчитать сумму целых чисел от 1 до 100, заметив, что 1 + 100 = 2 + 99 = … = 50 + 51. Теперь решите задачу посложнее: можно ли перед каждым из чисел от 1 до N... | ||||||||||||||||
|
PascalABC.NET Ленуар
https://www.cyberforum.ru/ pascalabc-net/ thread2339583.html Написать программу определения соответствующего дня недели по известным целым числам: J - число, М - месяц, А - год, применяя метод М.Ленуара, который заключается в следующем: 1) вычислить величину N: если месяц - январь или февраль високосного года, то N=1; если месяц - январь или февраль обычного года, то N=2; в других случаях N=0. Чтобы узнать, является ли год високосным, можно действовать... |
PascalABC.NET Найти ошибку в коде Нужно что-бы в введёной послдовательности чисел считалось Сумма, минимальное значение, и кол-во чисел где присутствует хотя бы одна шестёрка. С последним проблемы var x, s, k, min: integer; begin k := 0; x := 3465; s := 0; min := 32767; writeln('Введите целое число, 0 - окончание ввода'); https://www.cyberforum.ru/ pascalabc-net/ thread2339532.html | ||||||||||||||||
|
Подсчитать количество точек с целочисленными координатами внутри треугольника PascalABC.NET Помогите решить, а то я совсем запутался Равнобедренный треугольник задан на плоскости основанием и высотой, опущенной на основание; a – длина основания, h – высота (a, h – целые числа). Требуется подсчитать количество точек с целочисленными координатами, лежащих внутри этого треугольника (но не на его границе). Формат входных данных: В первой строке содержатся числа a (1 <= a <=... |
PascalABC.NET Then и else работают одновременно
https://www.cyberforum.ru/ pascalab
Наверх
| ||||||||||||||||
