Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Вывести номера квадратов, центр которой расположен на расстоянии, большем D, от заданной точки https://www.cyberforum.ru/ pascalabc/ thread1098047.html
Дано множество квадратов. Вывести номера квадратов, центр которой расположен на расстоянии, большем D, от точки (15, 15), а площадь - 500.
Pascal ABC Изменить программу с использованием подпрограмм (склад с лекарствами)
помогите изменить код (используя подпрограммы)? вот задача: На аптечном складе хранятся лекарства. Сведения о лекарствах содержаться в специальной ведомости: наименования лекарственного препарата; количество; цена; срок хранения( в месяцах). Выяснить, сколько стоит самый дорогой и самый дешевый препарат; сколько препаратов хранится на складе; какие препараты имеют срок хранения более трех...
Pascal ABC Дана строка, изображающая целое положительное число. Вывести сумму цифр этого числа https://www.cyberforum.ru/ pascalabc/ thread1097985.html
Дона строка, изображающая целое положительное число. Вывести сумму цифр этого числа.
Pascal ABC Найти номер первой из строк матрицы, содержащих равное количество положительных и отрицательных элементов https://www.cyberforum.ru/ pascalabc/ thread1097983.html
Дана целочисленная матрица размера M*N. Найти номер первой из ее строк, содержащих равное количество положительных и отрицательных элементов (нулевые элементы матрицы не учитываются). Если таких строк нет, то вывести 0.
Pascal ABC Изменить код, чтобы контуры были черные, а сама звезда была зелено-красная
Program Zvezda; Uses GraphABC; begin setpencolor(clRed); Line(290, 111, 240, 190); Line(240, 190, 171, 190); Line(170, 190, 241, 250); Line(241, 250, 209, 320); Line(209, 320, 290, 289);
Pascal ABC Дан целочисленный массив размера N. Удалите из массива все нечетные числа и вывести размер полученного массива и его содержимое Дан целочисленный массив размера N. Удалите из массива все нечетные числа и вывести размер полученного массива и его содержимое. https://www.cyberforum.ru/ pascalabc/ thread1097980.html
Pascal ABC Осуществить сдвиг элементов массива влево на K позиций. Последние К элементов полученного массива положить равными 0 https://www.cyberforum.ru/ pascalabc/ thread1097975.html
Дан массив размера N и целое число K(1<=K<N). Осуществить сдвиг элементов массива влево на K позиций. Последние К элементов полученного массива положить равными 0.
Дан массив размера N. Найти номер его первого локального минимума Pascal ABC
Дан массив размера N. Найти номер его первого локального минимума.(локальный минимум- это элемент, который меньше любого из своих соседних).
Pascal ABC Найти число, полученное при прочтении числа N справа налево https://www.cyberforum.ru/ pascalabc/ thread1097965.html
Дано целое число. Используя операции деления нацело и взятия остатка от деления, найти число, полученное при прочтении числа N справа налево.
Pascal ABC Дано целое число. найти произведение N!=1*2*...*N Дано целое число. найти произведение N!=1*2*...*N. Чтобы избежать целочисленного переполнения, вычислить это произведение с помощью вещественной переменной и вывести его как вещественное число. https://www.cyberforum.ru/ pascalabc/ thread1097962.html
Pascal ABC Даны четыре целых числа, одно из которых отличное от трех других, равных между собой. определите порядковый номер числа, отличного от остальных
даны четыре целых числа, одно из которых отличное от трех других, равных между собой. определите порядковый номер числа, отличного от остальных.
Pascal ABC Найти скалярное произведение векторов https://www.cyberforum.ru/ pascalabc/ thread1097933.html
Найти скалярное произведение векторов вектор а=(a1,a2,..an) и вектор b=(b1,b2,..bn) Добавлено через 2 часа 37 минут Помогите срочно!
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
16.02.2014, 19:14 0

Правильно ли решена задача (Сколько часов проработала вся бригада) - Pascal ABC - Ответ 5789673

16.02.2014, 19:14. Показов 751. Ответов 1
Метки (Все метки)

Ответ

Pascal
1
2
3
s:=m;
for i:=2 to N do
s:=s+m+(i-1)/10;


Вернуться к обсуждению:
Правильно ли решена задача (Сколько часов проработала вся бригада) Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.02.2014, 19:14
Готовые ответы и решения:

Определить, сколько часов проработала вся бригада
В бригаде, работающей на уборке сена, имеется N косилок. Первая из них работала m ч., а каждая...

Сколько часов проработала вся бригада на сенокосе.
В бригаде, работающей на уборке сена, имеется N косилок. Первая из них работала m час, а каждая...

Вычислить значения функции. Правильно ли решена задача?
Не знаю как записать Ln^2 (x). Правильно ли я сделала? program Zadacha2; var x, t: real;...

Правильно ли решена задача на нахождение суммы ряда?
Правильно ли я написал? Если нет, то исправьте. Найти сумму ряда с точностью \varepsilon...

1
16.02.2014, 19:14
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.02.2014, 19:14
Помогаю со студенческими работами здесь

Сколько часов проработала вся бригада
Помогите решить пару задач! 5) по теме цикл с параметром В бригаде,работающей на уборке...

Сколько часов проработала вся бригада
2В бригаде, работающей на уборке сена, имеется N сенокосилок. Первая сенокосилка работала m часов,...

Определить, сколько часов проработала вся бригада
В бригаде работающей на уборке сена имеется н косилок. Первая из них работала м часов а каждая...

Цикл: Сколько часов проработала вся бригада?
В бригаде, работающей на уборке сена, имеется N сенокосилок. Первая сенокосилка работала m часов, а...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru