|
|
Другие темы раздела | |
Pascal ABC Даны три целых числа A, B, C. Вывести на экран максимальное отрицательное число
https://www.cyberforum.ru/ pascalabc/ thread2180713.html Даны три целых числа A, B, C. Вывести на экран максимальное отрицательное число ....как можно эту задачку решить? |
Вычислить значение выражения Pascal ABC Вычислить значение выражения (2*5!+3*8!)/(6!+4!), используя функцию для вычисления n! |
Pascal ABC Вычислить сумму первых n членов последовательности Всем привет, у меня задание пытаюсь его решить уже много дней, но не выходит... По заданной формуле члена последовательности с номером k составить две программы: 1)программу вычисления суммы первых n членов последовательности (k=1,2,...,n); 2)Программу вычисления суммы всех членов последовательности, не меньше числа e. (k+0,5)/(3k^2+2) https://www.cyberforum.ru/ pascalabc/ thread2179986.html | Pascal ABC Определить разницу между максимальным и минимальным двухзначным числом Написать программу, позволяющую определить разницу между максимальным и минимальным двухзначным числом, оканч. на 2 и кратным 4. Желательно сделать и с циклом for, и с while. https://www.cyberforum.ru/ pascalabc/ thread2179978.html |
Поиск ошибок в программе Pascal ABC Program Ilgizzz; LABEL c; Const n=100;e=0.001; Var x,y,s,xn,xk,dx,a:real; i:integer; Function Fac(k: integer): longint; Begin If k=0 then Fac:= 1 else Fac:= k*Fac(k-1); End; Begin Writeln('Введите xn,xk,dx=>'); |
Pascal ABC Автоморфные числа
https://www.cyberforum.ru/ pascalabc/ thread2179873.html Помогите пожалуйста, буду очень благодарен) Нужно также использовать счетчик for. Натуральное число называется автоморфным, если оно равно последним цифрам своего квадрата. Например, 252=625. Напишите программу, которая получает натуральное число N и выводит на экран все автоморфные числа, не превосходящие N. Пример: Введите N: 1000 1*1=1 5*5=25 6*6=36 25*25=625 |
Pascal ABC Изменить программу Poisk применив цикл пока и добавить подсчет вхождений числа х в массив Program poisk; var T:array of integer; x,i:integer; begin for i:=1 to 10 do begin write('T='); read(T); end; readln(x); https://www.cyberforum.ru/ pascalabc/ thread2179820.html |
Pascal ABC Необходимо найти суммы нечетных чисел меньше 5 и сумму четных больше пяти в шестизначном числе Необходимо найти суммы нечетных чисел меньше 5 и сумму четных больше пяти в шестизначном числе. Заранее благодарю за помощь. |
Pascal ABC Циклически сдвинуть элементы массива на две позиции вправо
https://www.cyberforum.ru/ pascalabc/ thread2179467.html Доброго времени суток уважаемые форумчане! Совсем недавно я начал изучать программирование и столкнулся с такой задачей для языка Pascal: "Дан линейный массив из N целых чисел (N=10). Циклически сдвинуть элементы этого массива на две позиции вправо. Указание: циклический сдвиг на одну позицию вправо - это присваивание каждого значения элементу справа, а последнего значения - первому элементу" ... |
Pascal ABC Перевести код в жадный алгоритм
https://www.cyberforum.ru/ pascalabc/ thread2179439.html Помогите пожалуйста перевести этот код в жадный алгоритм program vzr; uses crt; var x:integer; a:arrayof integer; j,i,n1,n2,n,k,z:integer; begin write('Кол-во ящиков с отходами типа А: '); |
Как определить количество строк в массиве содержащих 0? Pascal ABC program gg; const n=5; var a:array of real; i,g,s,k:integer; begin a:=7.5; a:=-81.3; a:=3.48; a:=71.83; a:=-47.73; a:=87.5; a:=0; a:=-11.8; a:=0; a:=-73.41; a:=-83.06; a:=-65.7; a:=-58.45; a:=-25.91; a:=-49.91; a:=-43.67; a:=-73.57; a:=-57; a:=0; a:=-41.53; a:=49.51; a:=-0.73; a:=19.45; a:=27.81; a:=-13.48; |
Pascal ABC Напишите программу, которая найдет сумму нечетных чисел, которые меньше 100 Напишите программу, которая найдет сумму нечетных чисел, которые меньше 100 https://www.cyberforum.ru/ pascalabc/ thread2179310.html |
0 / 0 / 0
Регистрация: 27.01.2018
Сообщений: 8
|
|
27.01.2018, 16:52 [ТС] | 0 |
Среднее арифметическое для чётных цифр - Pascal ABC - Ответ 1206649727.01.2018, 16:52. Показов 4554. Ответов 4
Метки (Все метки)
Ответ
для чётных чисел а не цифр))) просто ошибся
Вернуться к обсуждению: Среднее арифметическое для чётных цифр Pascal ABC
0
|
27.01.2018, 16:52 | |
Готовые ответы и решения:
4
Вычислить среднее арифметическое для всех четных столбцов Найти сумму и среднее арифметическое арифметическое положительных четных элементов В исходной строке a, состоящей из цифр, определить среднее арифметическое цифр Найти среднее арифметическое четных элементов матрицы |
27.01.2018, 16:52 | |
27.01.2018, 16:52 | |
Помогаю со студенческими работами здесь
0
Определить среднее арифметическое четных элементов массива Массив: среднее арифметическое четных элементов массива Определить среднее арифметическое четных элементов массива Найти среднее арифметическое положительных четных чисел |