написать на языке паскаль программу ввода четырех целых чисел и вычисления их среднего арифметического. протестировать программу на различных исходных
5-9 класс
|
данных и доказать правильность ее работы
program fofgogjoj;
var
a,b,c,d:integer;
sr:real;
begin
Writeln('Введите 4 числа');
Readln(a,b,c,d);
sr:=(a+b+c+d)/4;
Writeln('Среднее арифмитическое чисел равно:',sr);
end.
Просто вводишь разные числа, а доказательством послужит нахождение этого же среднего арифмитического на листочке:)
Program pr; Var a, b, c, d:integer;sr:real; begin write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); write('d='); readln(d); writeln('Среднее арифметическое: ',(a+b+c+d)/4:0:2); end. Проверить можно и письменно. Данные вводишь сам.
Другие вопросы из категории
Читайте также
Написать программу ввода четырех целых чисел и вычисления их среднего арифметического. Протестировать программу на различных исходных данных (включая вещественные числа) и доказать правильность ее работы.
Разработать схему алгоритма для ввода четырех целых чисел и вычисления их среднего арифметического. Протестировать алгоритм на различных исходных данных( включая вещественные числа) и доказать правильность его работы.
19(16,3+7,7).а)19(16.3+7.7),в)19*(16.3+7.7).д)19(16,3+7.7).с)19*(16.3+7.7).2)Найдите правильную на языке паскаль записы выраженияа)34.5+24.5/15у в)(34.5+24.5)/15у с)(34.5+24.5)15*у.д)(34.5+24.5)/(15*у).3)Вычислите длину окружности и площадь круга одного и того же заданного радиуса R.4)Даны два числа.Найдите среднее арифметическое кубов этих чисел и среденее геометрическое модулей этих чисел.Два последних номера там нужно написать программу,программу присылать на листочке
вычисления: а) y=x^10 б) y=x^15. Постараться использовать минимальное количество дополнительных переменных. 2) Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и описанной окружностей. Программу записать на языке Паскаль. 3) Дана величина А, выражающая объём информации в байтах. Перевести А в более крупные единицы измерения информации. Программу записать на языке Паскаль