Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Предоплата всего
Подписываем
Отчёт.
Вариант №5.
Задача №5.
Даны два действительных числа. Найдите среднее арифметическое этих чисел и среднее геометрическое их модулей.
Блочная схема задачи:
program e;
var a,b:integer;
s,g:real;
begin
writeln('Введите два действительных числа');
readln(a,b);
s:=(a+b)/2;
g:=(abs(a)*abs(b))/2;
writeln('Cреднее арифметическое чисел равно ',s:2:2);
writeln('Среднее геометрическое модулей этих чисел ',g:2:2);
writeln('Нажмите Enter для выхода');
readln;
end.
|
№ |
Идентификатор переменной |
Переменная предназначена для хранения значений… |
|
1 |
a |
параметра |
|
2 |
b |
параметра |
|
3 |
s |
полученных в результате вычислений |
|
4 |
g |
Контрольный пример.
Введено:
a= 6
b= 10
Получено:
«Среднее арифметическое равно 8.00»
«Среднее геометрическое этих чисел 30.00»
Протокол работы программы при a=6, b=10
1. Печать сообщения «Введите два действительных числа»
2. Запрос, ввод и чтение с клавиатуры строки
«6 10»
Обработка строки «6 10», a=6, b=10
3. Вычисление:
«s:=(a+b)/2»
«g:=(abs(a)*abs(b))/2»
4. Печать сообщения:
«Среднее арифметическое чисел равно 8.00»
«Среднее геометрическое чисел равно 30.00»
5. Остановка
Печать сообщения
«Нажмите Enter для выхода»
6. Конец программы.
Начало
вод a, b
s:=(a+b)/2
Вывод: Среднее арифметическое s=
g:=(abs(a)*abs(b))/2
Вывод: Среднее геометрическое модулей g=
Конец