нужно вычислить среднее арифметическое двух вещественных чисел, если можно программу
5-9 класс
|
Program pr; Var a, b:real; Write('Введите A: ') ; Readln(a) ; Write('Введите B: ') ; Readln(b) ; Writeln('Среднее арифметическое: ',(a+b)/2); End.
Другие вопросы из категории
5- это отличный результат,4- не плохо ,но есть к чему стремитьсяв будущем! 3- ты можешь и лучше! 2 - ой,печалька!
Дано натуральное n . Вычислить :
P=(1-1/2)(1-1/3)*.....*(1-1/n) где n >2
2847 секторов объемом 512 байт.
а) при низком качестве звука: моно, 8 бит, 8 кГц;
клавиатура, джойстик, световое перо, сканер.
3.Монитор, принтер, плоттер, звуковые колонки.
Читайте также
распредилить, какие числа меньше нуля, но как вычислить среднее арифметическое, не зная точное кол-во отрицательных элементов? Желательно написать полной программой. Заранее спасибо с:
вычислил их среднее арифметическое и так обрадовался, что потерял число B. Помогите Васе восстановить потерянное число.
удалить последний из найденных.Помогите решить в паскале.(вычислить средн.ариф.номер э-та,....)
Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности). Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести среднее арифметическое чисел, кратных 9, или вывести NO, если таких чисел в последовательности нет.